rtc.c revision 1.25 1 /* $NetBSD: rtc.c,v 1.25 2025/09/07 21:45:13 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 1988 University of Utah.
5 * Copyright (c) 1982, 1990, 1993
6 * The Regents of the University of California. All rights reserved.
7 *
8 * This code is derived from software contributed to Berkeley by
9 * the Systems Programming Group of the University of Utah Computer
10 * Science Department.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 *
36 * from: Utah $Hdr: clock.c 1.18 91/01/21$
37 *
38 * @(#)clock.c 8.2 (Berkeley) 1/12/94
39 */
40
41 /*
42 * attachment for HP300 real-time clock (RTC)
43 */
44
45 #include <sys/cdefs.h>
46 __KERNEL_RCSID(0, "$NetBSD: rtc.c,v 1.25 2025/09/07 21:45:13 thorpej Exp $");
47
48 #include <sys/param.h>
49 #include <sys/systm.h>
50 #include <sys/device.h>
51
52 #include <hp300/dev/intiovar.h>
53 #include <hp300/dev/rtcreg.h>
54
55 #include <dev/clock_subr.h>
56
57 struct rtc_softc {
58 device_t sc_dev;
59 bus_space_tag_t sc_bst;
60 bus_space_handle_t sc_bsh;
61 struct todr_chip_handle sc_handle;
62 };
63
64 static int rtcmatch(device_t, cfdata_t, void *);
65 static void rtcattach(device_t, device_t, void *aux);
66
67 CFATTACH_DECL_NEW(rtc, sizeof(struct rtc_softc),
68 rtcmatch, rtcattach, NULL, NULL);
69
70 static int rtc_gettime_ymdhms(todr_chip_handle_t, struct clock_ymdhms *);
71 static int rtc_settime_ymdhms(todr_chip_handle_t, struct clock_ymdhms *);
72 static uint8_t rtc_readreg(struct rtc_softc *, int);
73 static uint8_t rtc_writereg(struct rtc_softc *, int, uint8_t);
74
75
76 static int
77 rtcmatch(device_t parent, cfdata_t cf, void *aux)
78 {
79 struct intio_attach_args *ia = aux;
80
81 /* 425e doesn't have the traditional RTC at intio */
82 if (machineid == HP_425 && mmuid == MMUID_425_E)
83 return 0;
84
85 if (strcmp("rtc", ia->ia_modname) != 0)
86 return 0;
87
88 return 1;
89 }
90
91 static void
92 rtcattach(device_t parent, device_t self, void *aux)
93 {
94 struct rtc_softc *sc = device_private(self);
95 struct intio_attach_args *ia = aux;
96 struct todr_chip_handle *todr_handle;
97 bus_space_tag_t bst = ia->ia_bst;
98
99 sc->sc_dev = self;
100 if (bus_space_map(bst, ia->ia_iobase, INTIO_DEVSIZE, 0,
101 &sc->sc_bsh)) {
102 aprint_error(": can't map registers\n");
103 return;
104 }
105
106 aprint_normal("\n");
107
108 sc->sc_bst = bst;
109
110 todr_handle = &sc->sc_handle;
111 todr_handle->todr_dev = self;
112 todr_handle->todr_gettime_ymdhms = rtc_gettime_ymdhms;
113 todr_handle->todr_settime_ymdhms = rtc_settime_ymdhms;
114
115 todr_attach(todr_handle);
116 }
117
118 static int
119 rtc_gettime_ymdhms(todr_chip_handle_t handle, struct clock_ymdhms *dt)
120 {
121 struct rtc_softc *sc = device_private(handle->todr_dev);
122 int i, year;
123 bool read_okay;
124 uint8_t rtc_registers[NUM_RTC_REGS];
125
126 /* read rtc registers */
127 read_okay = false;
128 while (!read_okay) {
129 read_okay = true;
130 for (i = 0; i < NUM_RTC_REGS; i++)
131 rtc_registers[i] = rtc_readreg(sc, i);
132 for (i = 0; i < NUM_RTC_REGS; i++)
133 if (rtc_registers[i] != rtc_readreg(sc, i))
134 read_okay = false;
135 }
136
137 #define rtc_to_decimal(a,b) (rtc_registers[a] * 10 + rtc_registers[b])
138
139 dt->dt_sec = rtc_to_decimal(1, 0);
140 dt->dt_min = rtc_to_decimal(3, 2);
141 dt->dt_hour = (rtc_registers[5] & RTC_REG5_HOUR) * 10 +
142 rtc_registers[4];
143 dt->dt_day = rtc_to_decimal(8, 7);
144 dt->dt_mon = rtc_to_decimal(10, 9);
145
146 year = rtc_to_decimal(12, 11) + RTC_BASE_YEAR;
147 if (year < POSIX_BASE_YEAR)
148 year += 100;
149 dt->dt_year = year;
150
151 #undef rtc_to_decimal
152
153 return 0;
154 }
155
156 static int
157 rtc_settime_ymdhms(todr_chip_handle_t handle, struct clock_ymdhms *dt)
158 {
159 struct rtc_softc *sc = device_private(handle->todr_dev);
160 int i, year;
161 uint8_t rtc_registers[NUM_RTC_REGS];
162
163 year = dt->dt_year - RTC_BASE_YEAR;
164 if (year > 99)
165 year -= 100;
166
167 #define decimal_to_rtc(a,b,n) \
168 rtc_registers[a] = (n) % 10; \
169 rtc_registers[b] = (n) / 10;
170
171 decimal_to_rtc(0, 1, dt->dt_sec);
172 decimal_to_rtc(2, 3, dt->dt_min);
173 decimal_to_rtc(7, 8, dt->dt_day);
174 decimal_to_rtc(9, 10, dt->dt_mon);
175 decimal_to_rtc(11, 12, year);
176
177 rtc_registers[4] = dt->dt_hour % 10;
178 rtc_registers[5] = ((dt->dt_hour / 10) & RTC_REG5_HOUR) | RTC_REG5_24HR;
179
180 rtc_registers[6] = 0;
181
182 #undef decimal_to_rtc
183
184 /* write rtc registers */
185 rtc_writereg(sc, 15, 13); /* reset prescalar */
186 for (i = 0; i < NUM_RTC_REGS; i++)
187 if (rtc_registers[i] !=
188 rtc_writereg(sc, i, rtc_registers[i]))
189 return 1;
190 return 0;
191 }
192
193 static uint8_t
194 rtc_readreg(struct rtc_softc *sc, int reg)
195 {
196 bus_space_tag_t bst = sc->sc_bst;
197 bus_space_handle_t bsh = sc->sc_bsh;
198 uint8_t data;
199 int s = splvm();
200
201 data = reg;
202 intio_device_writecmd(bst, bsh, RTC_SET_REG, &data, 1);
203 intio_device_readcmd(bst, bsh, RTC_READ_REG, &data);
204
205 splx(s);
206 return data;
207 }
208
209 static uint8_t
210 rtc_writereg(struct rtc_softc *sc, int reg, uint8_t data)
211 {
212 bus_space_tag_t bst = sc->sc_bst;
213 bus_space_handle_t bsh = sc->sc_bsh;
214 uint8_t tmp;
215 int s = splvm();
216
217 tmp = (data << 4) | reg;
218 intio_device_writecmd(bst, bsh, RTC_SET_REG, &tmp, 1);
219 intio_device_writecmd(bst, bsh, RTC_WRITE_REG, NULL, 0);
220 intio_device_readcmd(bst, bsh, RTC_READ_REG, &tmp);
221
222 splx(s);
223 return tmp;
224 }
225