/* $NetBSD: timekeeper.c,v 1.1 2000/01/05 08:48:56 nisimura Exp $ */ /*- * Copyright (c) 2000 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Tohru Nishimura. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the NetBSD * Foundation, Inc. and its contributors. * 4. Neither the name of The NetBSD Foundation nor the names of its * contributors may be used to endorse or promote products derived * from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ #include /* RCS ID & Copyright macro defns */ __KERNEL_RCSID(0, "$NetBSD: timekeeper.c,v 1.1 2000/01/05 08:48:56 nisimura Exp $"); #include #include #include #include #include #include #include #include #include #define YEAR0 1970 /* year offset */ struct timekeeper_softc { struct device sc_dev; void *sc_clock, *sc_nvram; int sc_nvramsize; u_int8_t sc_image[2040]; }; /* * BCD to decimal and decimal to BCD. */ #define FROMBCD(x) (((x) >> 4) * 10 + ((x) & 0xf)) #define TOBCD(x) (((x) / 10 * 16) + ((x) % 10)) static int clock_match __P((struct device *, struct cfdata *, void *)); static void clock_attach __P((struct device *, struct device *, void *)); const struct cfattach clock_ca = { sizeof (struct timekeeper_softc), clock_match, clock_attach }; extern struct cfdriver clock_cd; static void mkclock_get __P((struct device *, time_t, struct clock_ymdhms *)); static void mkclock_set __P((struct device *, struct clock_ymdhms *)); static void dsclock_get __P((struct device *, time_t, struct clock_ymdhms *)); static void dsclock_set __P((struct device *, struct clock_ymdhms *)); static struct clockfns mkclock_clockfns = { NULL /* never used */, mkclock_get, mkclock_set, }; static struct clockfns dsclock_clockfns = { NULL /* never used */, dsclock_get, dsclock_set, }; static int clock_match(parent, match, aux) struct device *parent; struct cfdata *match; void *aux; { struct mainbus_attach_args *ma = aux; if (strcmp(ma->ma_name, clock_cd.cd_name)) return 0; return 1; } static void clock_attach(parent, self, aux) struct device *parent, *self; void *aux; { struct timekeeper_softc *sc = (void *)self; struct mainbus_attach_args *ma = aux; struct clockfns *clockwork; switch (machtype) { default: case LUNA_I: /* Mostek MK48T02 */ sc->sc_clock = (void *)(ma->ma_addr + 2040); sc->sc_nvram = (void *)ma->ma_addr; sc->sc_nvramsize = 2040; clockwork = &mkclock_clockfns; printf(": mk48t02\n"); break; case LUNA_II: /* Dallas DS1287A */ sc->sc_clock = (void *)ma->ma_addr; sc->sc_nvram = (void *)(ma->ma_addr + 50); sc->sc_nvramsize = 50; clockwork = &dsclock_clockfns; printf(": ds1287a\n"); break; } clockattach(&sc->sc_dev, clockwork); memcpy(sc->sc_image, sc->sc_nvram, sc->sc_nvramsize); } /* * Get the time of day, based on the clock's value and/or the base value. */ static void mkclock_get(dev, base, dt) struct device *dev; time_t base; struct clock_ymdhms *dt; { struct timekeeper_softc *sc = (void *)dev; volatile u_int8_t *chiptime = (void *)sc->sc_clock; int s; s = splclock(); chiptime[MK_CSR] |= MK_CSR_READ; /* enable read (stop time) */ dt->dt_sec = FROMBCD(chiptime[MK_SEC]); dt->dt_min = FROMBCD(chiptime[MK_MIN]); dt->dt_hour = FROMBCD(chiptime[MK_HOUR]); dt->dt_wday = FROMBCD(chiptime[MK_DOW]); dt->dt_day = FROMBCD(chiptime[MK_DOM]); dt->dt_mon = FROMBCD(chiptime[MK_MONTH]); dt->dt_year = FROMBCD(chiptime[MK_YEAR]) + YEAR0; chiptime[MK_CSR] &= ~MK_CSR_READ; /* time wears on */ splx(s); #ifdef TIMEKEEPER_DEBUG printf("get %d/%d/%d %d:%d:%d\n", dt->dt_year, dt->dt_mon, dt->dt_day, dt->dt_hour, dt->dt_min, dt->dt_sec); #endif } /* * Reset the TODR based on the time value. */ static void mkclock_set(dev, dt) struct device *dev; struct clock_ymdhms *dt; { struct timekeeper_softc *sc = (void *)dev; volatile u_int8_t *chiptime = (void *)sc->sc_clock; volatile u_int8_t *stamp = (u_int8_t *)sc->sc_nvram + 0x10; int s; s = splclock(); chiptime[MK_CSR] |= MK_CSR_WRITE; /* enable write */ chiptime[MK_SEC] = TOBCD(dt->dt_sec); chiptime[MK_MIN] = TOBCD(dt->dt_min); chiptime[MK_HOUR] = TOBCD(dt->dt_hour); chiptime[MK_DOW] = TOBCD(dt->dt_wday); chiptime[MK_DOM] = TOBCD(dt->dt_day); chiptime[MK_MONTH] = TOBCD(dt->dt_mon); chiptime[MK_YEAR] = TOBCD(dt->dt_year - YEAR0); chiptime[MK_CSR] &= ~MK_CSR_WRITE; /* load them up */ splx(s); #ifdef TIMEKEEPER_DEBUG printf("set %d/%d/%d %d:%d:%d\n", dt->dt_year, dt->dt_mon, dt->dt_day, dt->dt_hour, dt->dt_min, dt->dt_sec); #endif stamp[0] = 'R'; stamp[1] = 'T'; stamp[2] = 'C'; stamp[3] = '\0'; } /* * Get the time of day, based on the clock's value and/or the base value. */ static void dsclock_get(dev, base, dt) struct device *dev; time_t base; struct clock_ymdhms *dt; { struct timekeeper_softc *sc = (void *)dev; volatile u_int8_t *chiptime = (void *)sc->sc_clock; int s; s = splclock(); /* update in progress; spin loop */ while (chiptime[MC_REGA] & MC_REGA_UIP) ; dt->dt_sec = chiptime[MC_SEC]; dt->dt_min = chiptime[MC_MIN]; dt->dt_hour = chiptime[MC_HOUR]; dt->dt_wday = chiptime[MC_DOW]; dt->dt_day = chiptime[MC_DOM]; dt->dt_mon = chiptime[MC_MONTH]; dt->dt_year = chiptime[MC_YEAR] + YEAR0; splx(s); } /* * Reset the TODR based on the time value. */ static void dsclock_set(dev, dt) struct device *dev; struct clock_ymdhms *dt; { struct timekeeper_softc *sc = (void *)dev; volatile u_int8_t *chiptime = (void *)sc->sc_clock; int s; s = splclock(); chiptime[MC_REGB] |= MC_REGB_SET; /* enable write */ chiptime[MC_SEC] = dt->dt_sec; chiptime[MC_MIN] = dt->dt_min; chiptime[MC_HOUR] = dt->dt_hour; chiptime[MC_DOW] = dt->dt_wday; chiptime[MC_DOM] = dt->dt_day; chiptime[MC_MONTH] = dt->dt_mon; chiptime[MC_YEAR] = dt->dt_year - YEAR0; chiptime[MC_REGB] &= ~MC_REGB_SET; /* load them up */ splx(s); }