rtc.c revision 1.19.26.1 1 /* $NetBSD: rtc.c,v 1.19.26.1 2011/03/05 20:50:22 rmind 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.19.26.1 2011/03/05 20:50:22 rmind Exp $");
47
48 #include <sys/param.h>
49 #include <sys/systm.h>
50 #include <sys/device.h>
51 #include <sys/malloc.h>
52
53 #include <hp300/dev/intiovar.h>
54 #include <hp300/dev/rtcreg.h>
55
56 #include <dev/clock_subr.h>
57
58 struct rtc_softc {
59 device_t sc_dev;
60 bus_space_tag_t sc_bst;
61 bus_space_handle_t sc_bsh;
62 struct todr_chip_handle sc_handle;
63 };
64
65 static int rtcmatch(device_t, cfdata_t, void *);
66 static void rtcattach(device_t, device_t, void *aux);
67
68 CFATTACH_DECL_NEW(rtc, sizeof(struct rtc_softc),
69 rtcmatch, rtcattach, NULL, NULL);
70
71 static int rtc_gettime_ymdhms(todr_chip_handle_t, struct clock_ymdhms *);
72 static int rtc_settime_ymdhms(todr_chip_handle_t, struct clock_ymdhms *);
73 static uint8_t rtc_readreg(struct rtc_softc *, int);
74 static uint8_t rtc_writereg(struct rtc_softc *, int, uint8_t);
75
76
77 static int
78 rtcmatch(device_t parent, cfdata_t cf, void *aux)
79 {
80 struct intio_attach_args *ia = aux;
81
82 if (strcmp("rtc", ia->ia_modname) != 0)
83 return 0;
84
85 return 1;
86 }
87
88 static void
89 rtcattach(device_t parent, device_t self, void *aux)
90 {
91 struct rtc_softc *sc = device_private(self);
92 struct intio_attach_args *ia = aux;
93 struct todr_chip_handle *todr_handle;
94 bus_space_tag_t bst = ia->ia_bst;
95
96 sc->sc_dev = self;
97 if (bus_space_map(bst, ia->ia_iobase, INTIO_DEVSIZE, 0,
98 &sc->sc_bsh)) {
99 aprint_error(": can't map registers\n");
100 return;
101 }
102
103 aprint_normal("\n");
104
105 sc->sc_bst = bst;
106
107 todr_handle = &sc->sc_handle;
108 todr_handle->cookie = sc;
109 todr_handle->todr_gettime = NULL;
110 todr_handle->todr_settime = NULL;
111 todr_handle->todr_gettime_ymdhms = rtc_gettime_ymdhms;
112 todr_handle->todr_settime_ymdhms = rtc_settime_ymdhms;
113 todr_handle->todr_setwen = NULL;
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;
122 int i, year;
123 bool read_okay;
124 uint8_t rtc_registers[NUM_RTC_REGS];
125
126 sc = handle->cookie;
127
128 /* read rtc registers */
129 read_okay = false;
130 while (!read_okay) {
131 read_okay = true;
132 for (i = 0; i < NUM_RTC_REGS; i++)
133 rtc_registers[i] = rtc_readreg(sc, i);
134 for (i = 0; i < NUM_RTC_REGS; i++)
135 if (rtc_registers[i] != rtc_readreg(sc, i))
136 read_okay = false;
137 }
138
139 #define rtc_to_decimal(a,b) (rtc_registers[a] * 10 + rtc_registers[b])
140
141 dt->dt_sec = rtc_to_decimal(1, 0);
142 dt->dt_min = rtc_to_decimal(3, 2);
143 dt->dt_hour = (rtc_registers[5] & RTC_REG5_HOUR) * 10 +
144 rtc_registers[4];
145 dt->dt_day = rtc_to_decimal(8, 7);
146 dt->dt_mon = rtc_to_decimal(10, 9);
147
148 year = rtc_to_decimal(12, 11) + RTC_BASE_YEAR;
149 if (year < POSIX_BASE_YEAR)
150 year += 100;
151 dt->dt_year = year;
152
153 #undef rtc_to_decimal
154
155 return 0;
156 }
157
158 static int
159 rtc_settime_ymdhms(todr_chip_handle_t handle, struct clock_ymdhms *dt)
160 {
161 struct rtc_softc *sc;
162 int i, year;
163 uint8_t rtc_registers[NUM_RTC_REGS];
164
165 sc = handle->cookie;
166 year = dt->dt_year - RTC_BASE_YEAR;
167 if (year > 99)
168 year -= 100;
169
170 #define decimal_to_rtc(a,b,n) \
171 rtc_registers[a] = (n) % 10; \
172 rtc_registers[b] = (n) / 10;
173
174 decimal_to_rtc(0, 1, dt->dt_sec);
175 decimal_to_rtc(2, 3, dt->dt_min);
176 decimal_to_rtc(7, 8, dt->dt_day);
177 decimal_to_rtc(9, 10, dt->dt_mon);
178 decimal_to_rtc(11, 12, year);
179
180 rtc_registers[4] = dt->dt_hour % 10;
181 rtc_registers[5] = ((dt->dt_hour / 10) & RTC_REG5_HOUR) | RTC_REG5_24HR;
182
183 rtc_registers[6] = 0;
184
185 #undef decimal_to_rtc
186
187 /* write rtc registers */
188 rtc_writereg(sc, 15, 13); /* reset prescalar */
189 for (i = 0; i < NUM_RTC_REGS; i++)
190 if (rtc_registers[i] !=
191 rtc_writereg(sc, i, rtc_registers[i]))
192 return 1;
193 return 0;
194 }
195
196 static uint8_t
197 rtc_readreg(struct rtc_softc *sc, int reg)
198 {
199 bus_space_tag_t bst = sc->sc_bst;
200 bus_space_handle_t bsh = sc->sc_bsh;
201 uint8_t data;
202 int s = splvm();
203
204 data = reg;
205 intio_device_writecmd(bst, bsh, RTC_SET_REG, &data, 1);
206 intio_device_readcmd(bst, bsh, RTC_READ_REG, &data);
207
208 splx(s);
209 return data;
210 }
211
212 static uint8_t
213 rtc_writereg(struct rtc_softc *sc, int reg, uint8_t data)
214 {
215 bus_space_tag_t bst = sc->sc_bst;
216 bus_space_handle_t bsh = sc->sc_bsh;
217 uint8_t tmp;
218 int s = splvm();
219
220 tmp = (data << 4) | reg;
221 intio_device_writecmd(bst, bsh, RTC_SET_REG, &tmp, 1);
222 intio_device_writecmd(bst, bsh, RTC_WRITE_REG, NULL, 0);
223 intio_device_readcmd(bst, bsh, RTC_READ_REG, &tmp);
224
225 splx(s);
226 return tmp;
227 }
228