/* $NetBSD: ds1286.c,v 1.1 2001/05/11 03:16:59 thorpej Exp $ */ /* * Copyright (c) 2001 Rafal K. Boni * Copyright (c) 2001 Christopher Sekiya * Copyright (c) 1998, 1999, 2000 The NetBSD Foundation, Inc. * All rights reserved. * * Portions of this code are derived from software contributed to The * NetBSD Foundation by Jason R. Thorpe of the Numerical Aerospace * Simulation Facility, NASA Ames Research Center. * * 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. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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 #include #include #include #include #include #include #include #include #include #include extern int mach_type; extern struct platform platform; void clockattach(struct device *, const struct clockfns *); struct dsclock_softc { struct device sc_dev; /* RTC registers */ bus_space_tag_t sc_rtct; bus_space_handle_t sc_rtch; }; static void dsclock_init(struct device *); static int dsclock_match(struct device *, struct cfdata *, void *); static void dsclock_attach(struct device *, struct device *, void *); static void dsclock_get(struct device *, struct clock_ymdhms *); static void dsclock_set(struct device *, struct clock_ymdhms *); const struct clockfns dsclock_clockfns = { dsclock_init, dsclock_get, dsclock_set, }; struct cfattach dsclock_ca = { sizeof(struct dsclock_softc), dsclock_match, dsclock_attach }; #define IRIX_CLOCK_BASE 1940 #define ds1286_write(dev, reg, datum) \ bus_space_write_1(dev->sc_rtct, dev->sc_rtch, reg, datum) #define ds1286_read(dev, reg) \ (bus_space_read_1(dev->sc_rtct, dev->sc_rtch, reg)) static int dsclock_match(struct device *parent, struct cfdata *match, void *aux) { if (mach_type == MACH_SGI_IP22) return 1; else return 0; } static void dsclock_attach(struct device *parent, struct device *self, void *aux) { struct dsclock_softc *sc = (void *)self; struct hpc_attach_args *haa = aux; int err; printf("\n"); sc->sc_rtct = haa->ha_iot; if ((err = bus_space_subregion(haa->ha_iot, haa->ha_ioh, 0x60000, 0x1ffff, &sc->sc_rtch)) != 0) { printf(": unable to map RTC registers, error = %d\n", err); return; } clockattach(&sc->sc_dev, &dsclock_clockfns); } static void dsclock_init(struct device *dev) { } /* * Get the time of day, based on the clock's value and/or the base value. */ static void dsclock_get(struct device *dev, struct clock_ymdhms * dt) { struct dsclock_softc *sc = (struct dsclock_softc *)dev; ds_todregs regs; int s; s = splhigh(); DS1286_GETTOD(sc, ®s) splx(s); dt->dt_sec = FROMBCD(regs[DS_SEC]); dt->dt_min = FROMBCD(regs[DS_MIN]); if (regs[DS_HOUR] & DS_HOUR_12MODE) { dt->dt_hour = FROMBCD(regs[DS_HOUR] & DS_HOUR_12HR_MASK) + ((regs[DS_HOUR] & DS_HOUR_12HR_PM) ? 12 : 0); /* * In AM/PM mode, hour range is 01-12, so adding in 12 hours * for PM gives us 01-24, whereas we want 00-23, so map hour * 24 to hour 0. */ if (dt->dt_hour == 24) dt->dt_hour = 0; } else { dt->dt_hour = FROMBCD(regs[DS_HOUR] & DS_HOUR_24HR_MASK); } dt->dt_wday = FROMBCD(regs[DS_DOW]); dt->dt_day = FROMBCD(regs[DS_DOM]); dt->dt_mon = FROMBCD(regs[DS_MONTH] & DS_MONTH_MASK); dt->dt_year = FROMBCD(regs[DS_YEAR]); /* RTC base on IRIX is 1940, offsets < 45 are from 1970 */ if (dt->dt_year < 45) dt->dt_year += 30; dt->dt_year += IRIX_CLOCK_BASE; /* 1940 */ } /* * Reset the TODR based on the time value. */ static void dsclock_set(struct device *dev, struct clock_ymdhms * dt) { struct dsclock_softc *sc = (struct dsclock_softc *)dev; ds_todregs regs; int s; s = splhigh(); DS1286_GETTOD(sc, ®s); splx(s); regs[DS_SUBSEC] = 0; regs[DS_SEC] = TOBCD(dt->dt_sec); regs[DS_MIN] = TOBCD(dt->dt_min); regs[DS_HOUR] = TOBCD(dt->dt_hour) & DS_HOUR_24HR_MASK; regs[DS_DOW] = TOBCD(dt->dt_wday); regs[DS_DOM] = TOBCD(dt->dt_day); /* Leave wave-generator bits as set originally */ regs[DS_MONTH] &= ~DS_MONTH_MASK; regs[DS_MONTH] |= TOBCD(dt->dt_mon) & DS_MONTH_MASK; /* * If year < 1985, store (year - 1970), else (year - 1940). This * matches IRIX semantics. */ if (dt->dt_year < 1985) dt->dt_year -= 30; regs[DS_YEAR] = TOBCD(dt->dt_year - IRIX_CLOCK_BASE); /* - 1940 */ s = splhigh(); DS1286_PUTTOD(sc, ®s); splx(s); }