242 lines
7.2 KiB
C
242 lines
7.2 KiB
C
/* $NetBSD: timekeeper.c,v 1.3 2006/03/12 22:55:19 he 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 <sys/cdefs.h> /* RCS ID & Copyright macro defns */
|
|
|
|
__KERNEL_RCSID(0, "$NetBSD: timekeeper.c,v 1.3 2006/03/12 22:55:19 he Exp $");
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/device.h>
|
|
#include <sys/kernel.h>
|
|
|
|
#include <machine/cpu.h>
|
|
|
|
#include <dev/clock_subr.h>
|
|
#include <luna68k/luna68k/clockvar.h>
|
|
#include <luna68k/dev/timekeeper.h>
|
|
#include <machine/autoconf.h>
|
|
|
|
#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];
|
|
};
|
|
|
|
static int clock_match __P((struct device *, struct cfdata *, void *));
|
|
static void clock_attach __P((struct device *, struct device *, void *));
|
|
|
|
CFATTACH_DECL(clock, sizeof (struct timekeeper_softc),
|
|
clock_match, clock_attach, NULL, NULL);
|
|
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);
|
|
}
|