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