Home | History | Annotate | Line # | Download | only in dev
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