timekeeper.c revision 1.2 1 /* $NetBSD: timekeeper.c,v 1.2 2002/10/02 05:31:47 thorpej Exp $ */
2
3 /*-
4 * Copyright (c) 2000 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Tohru Nishimura.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */
40
41 __KERNEL_RCSID(0, "$NetBSD: timekeeper.c,v 1.2 2002/10/02 05:31:47 thorpej Exp $");
42
43 #include <sys/param.h>
44 #include <sys/systm.h>
45 #include <sys/device.h>
46 #include <sys/kernel.h>
47
48 #include <machine/cpu.h>
49
50 #include <dev/clock_subr.h>
51 #include <luna68k/luna68k/clockvar.h>
52 #include <luna68k/dev/timekeeper.h>
53 #include <machine/autoconf.h>
54
55 #define YEAR0 1970 /* year offset */
56
57 struct timekeeper_softc {
58 struct device sc_dev;
59 void *sc_clock, *sc_nvram;
60 int sc_nvramsize;
61 u_int8_t sc_image[2040];
62 };
63
64 /*
65 * BCD to decimal and decimal to BCD.
66 */
67 #define FROMBCD(x) (((x) >> 4) * 10 + ((x) & 0xf))
68 #define TOBCD(x) (((x) / 10 * 16) + ((x) % 10))
69
70 static int clock_match __P((struct device *, struct cfdata *, void *));
71 static void clock_attach __P((struct device *, struct device *, void *));
72
73 CFATTACH_DECL(clock, sizeof (struct timekeeper_softc),
74 clock_match, clock_attach, NULL, NULL);
75 extern struct cfdriver clock_cd;
76
77 static void mkclock_get __P((struct device *, time_t, struct clock_ymdhms *));
78 static void mkclock_set __P((struct device *, struct clock_ymdhms *));
79 static void dsclock_get __P((struct device *, time_t, struct clock_ymdhms *));
80 static void dsclock_set __P((struct device *, struct clock_ymdhms *));
81
82 static struct clockfns mkclock_clockfns = {
83 NULL /* never used */, mkclock_get, mkclock_set,
84 };
85
86 static struct clockfns dsclock_clockfns = {
87 NULL /* never used */, dsclock_get, dsclock_set,
88 };
89
90 static int
91 clock_match(parent, match, aux)
92 struct device *parent;
93 struct cfdata *match;
94 void *aux;
95 {
96 struct mainbus_attach_args *ma = aux;
97
98 if (strcmp(ma->ma_name, clock_cd.cd_name))
99 return 0;
100 return 1;
101 }
102
103 static void
104 clock_attach(parent, self, aux)
105 struct device *parent, *self;
106 void *aux;
107 {
108 struct timekeeper_softc *sc = (void *)self;
109 struct mainbus_attach_args *ma = aux;
110 struct clockfns *clockwork;
111
112 switch (machtype) {
113 default:
114 case LUNA_I: /* Mostek MK48T02 */
115 sc->sc_clock = (void *)(ma->ma_addr + 2040);
116 sc->sc_nvram = (void *)ma->ma_addr;
117 sc->sc_nvramsize = 2040;
118 clockwork = &mkclock_clockfns;
119 printf(": mk48t02\n");
120 break;
121 case LUNA_II: /* Dallas DS1287A */
122 sc->sc_clock = (void *)ma->ma_addr;
123 sc->sc_nvram = (void *)(ma->ma_addr + 50);
124 sc->sc_nvramsize = 50;
125 clockwork = &dsclock_clockfns;
126 printf(": ds1287a\n");
127 break;
128 }
129 clockattach(&sc->sc_dev, clockwork);
130 memcpy(sc->sc_image, sc->sc_nvram, sc->sc_nvramsize);
131 }
132
133 /*
134 * Get the time of day, based on the clock's value and/or the base value.
135 */
136 static void
137 mkclock_get(dev, base, dt)
138 struct device *dev;
139 time_t base;
140 struct clock_ymdhms *dt;
141 {
142 struct timekeeper_softc *sc = (void *)dev;
143 volatile u_int8_t *chiptime = (void *)sc->sc_clock;
144 int s;
145
146 s = splclock();
147 chiptime[MK_CSR] |= MK_CSR_READ; /* enable read (stop time) */
148 dt->dt_sec = FROMBCD(chiptime[MK_SEC]);
149 dt->dt_min = FROMBCD(chiptime[MK_MIN]);
150 dt->dt_hour = FROMBCD(chiptime[MK_HOUR]);
151 dt->dt_wday = FROMBCD(chiptime[MK_DOW]);
152 dt->dt_day = FROMBCD(chiptime[MK_DOM]);
153 dt->dt_mon = FROMBCD(chiptime[MK_MONTH]);
154 dt->dt_year = FROMBCD(chiptime[MK_YEAR]) + YEAR0;
155 chiptime[MK_CSR] &= ~MK_CSR_READ; /* time wears on */
156 splx(s);
157 #ifdef TIMEKEEPER_DEBUG
158 printf("get %d/%d/%d %d:%d:%d\n",
159 dt->dt_year, dt->dt_mon, dt->dt_day,
160 dt->dt_hour, dt->dt_min, dt->dt_sec);
161 #endif
162 }
163
164 /*
165 * Reset the TODR based on the time value.
166 */
167 static void
168 mkclock_set(dev, dt)
169 struct device *dev;
170 struct clock_ymdhms *dt;
171 {
172 struct timekeeper_softc *sc = (void *)dev;
173 volatile u_int8_t *chiptime = (void *)sc->sc_clock;
174 volatile u_int8_t *stamp = (u_int8_t *)sc->sc_nvram + 0x10;
175 int s;
176
177 s = splclock();
178 chiptime[MK_CSR] |= MK_CSR_WRITE; /* enable write */
179 chiptime[MK_SEC] = TOBCD(dt->dt_sec);
180 chiptime[MK_MIN] = TOBCD(dt->dt_min);
181 chiptime[MK_HOUR] = TOBCD(dt->dt_hour);
182 chiptime[MK_DOW] = TOBCD(dt->dt_wday);
183 chiptime[MK_DOM] = TOBCD(dt->dt_day);
184 chiptime[MK_MONTH] = TOBCD(dt->dt_mon);
185 chiptime[MK_YEAR] = TOBCD(dt->dt_year - YEAR0);
186 chiptime[MK_CSR] &= ~MK_CSR_WRITE; /* load them up */
187 splx(s);
188 #ifdef TIMEKEEPER_DEBUG
189 printf("set %d/%d/%d %d:%d:%d\n",
190 dt->dt_year, dt->dt_mon, dt->dt_day,
191 dt->dt_hour, dt->dt_min, dt->dt_sec);
192 #endif
193
194 stamp[0] = 'R'; stamp[1] = 'T'; stamp[2] = 'C'; stamp[3] = '\0';
195 }
196
197 /*
198 * Get the time of day, based on the clock's value and/or the base value.
199 */
200 static void
201 dsclock_get(dev, base, dt)
202 struct device *dev;
203 time_t base;
204 struct clock_ymdhms *dt;
205 {
206 struct timekeeper_softc *sc = (void *)dev;
207 volatile u_int8_t *chiptime = (void *)sc->sc_clock;
208 int s;
209
210 s = splclock();
211 /* update in progress; spin loop */
212 while (chiptime[MC_REGA] & MC_REGA_UIP)
213 ;
214 dt->dt_sec = chiptime[MC_SEC];
215 dt->dt_min = chiptime[MC_MIN];
216 dt->dt_hour = chiptime[MC_HOUR];
217 dt->dt_wday = chiptime[MC_DOW];
218 dt->dt_day = chiptime[MC_DOM];
219 dt->dt_mon = chiptime[MC_MONTH];
220 dt->dt_year = chiptime[MC_YEAR] + YEAR0;
221 splx(s);
222 }
223
224 /*
225 * Reset the TODR based on the time value.
226 */
227 static void
228 dsclock_set(dev, dt)
229 struct device *dev;
230 struct clock_ymdhms *dt;
231 {
232 struct timekeeper_softc *sc = (void *)dev;
233 volatile u_int8_t *chiptime = (void *)sc->sc_clock;
234 int s;
235
236 s = splclock();
237 chiptime[MC_REGB] |= MC_REGB_SET; /* enable write */
238 chiptime[MC_SEC] = dt->dt_sec;
239 chiptime[MC_MIN] = dt->dt_min;
240 chiptime[MC_HOUR] = dt->dt_hour;
241 chiptime[MC_DOW] = dt->dt_wday;
242 chiptime[MC_DOM] = dt->dt_day;
243 chiptime[MC_MONTH] = dt->dt_mon;
244 chiptime[MC_YEAR] = dt->dt_year - YEAR0;
245 chiptime[MC_REGB] &= ~MC_REGB_SET; /* load them up */
246 splx(s);
247 }
248