Initial commit for OpenBSD/luna88k, based on OpenBSD/mvme88k, NetBSD/luna68k and CMU Mach.

1 files changed, 303 insertions, 0 deletions

diff --git a/sys/arch/luna88k/dev/timekeeper.c b/sys/arch/luna88k/dev/timekeeper.c
new file mode 100644
index 00000000000..b154c1fd104
--- /dev/null
+++ b/sys/arch/luna88k/dev/timekeeper.c
@@ -0,0 +1,303 @@
+/* $OpenBSD: timekeeper.c,v 1.1 2004/04/21 15:23:56 aoyama Exp $ */
+/* $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 <sys/param.h>
+#include <sys/systm.h>
+#include <sys/device.h>
+#include <sys/kernel.h>
+
+#include <machine/board.h>	/* machtype value */
+#include <machine/cpu.h>
+
+#include <dev/clock_subr.h>
+#include <luna88k/luna88k/clockvar.h>
+#include <luna88k/dev/timekeeper.h>
+#include <machine/autoconf.h>
+
+#define	MK_YEAR0	1970	/* year offset of MK*/
+#define	DS_YEAR0	1990	/* year offset of DS*/
+
+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))
+
+int  clock_match(struct device *, void *, void *);
+void clock_attach(struct device *, struct device *, void *);
+
+struct cfattach clock_ca = {
+	sizeof (struct timekeeper_softc), clock_match, clock_attach
+};
+
+struct cfdriver clock_cd = {
+        NULL, "clock", DV_DULL
+};
+
+void mkclock_get(struct device *, time_t, struct clock_ymdhms *);
+void mkclock_set(struct device *, struct clock_ymdhms *);
+void dsclock_get(struct device *, time_t, struct clock_ymdhms *);
+void dsclock_set(struct device *, struct clock_ymdhms *);
+
+const struct clockfns mkclock_clockfns = {
+	NULL /* never used */, mkclock_get, mkclock_set,
+};
+
+const struct clockfns dsclock_clockfns = {
+	NULL /* never used */, dsclock_get, dsclock_set,
+};
+
+int
+clock_match(parent, match, aux)
+        struct device *parent;
+        void *match, *aux;
+{
+	struct mainbus_attach_args *ma = aux;
+
+	if (strcmp(ma->ma_name, clock_cd.cd_name))
+		return 0;
+	return 1;
+}
+
+extern int machtype; /* in machdep.c */
+
+void
+clock_attach(parent, self, aux)
+        struct device *parent, *self;
+        void *aux;
+{
+	struct timekeeper_softc *sc = (void *)self;
+	struct mainbus_attach_args *ma = aux;
+	const struct clockfns *clockwork;
+
+	switch (machtype) {
+	default:
+	case LUNA_88K:	/* 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_88K2: /* Dallas DS1397 */
+		sc->sc_clock = (void *)ma->ma_addr;
+		sc->sc_nvram = (void *)(ma->ma_addr + 50);
+		sc->sc_nvramsize = 50;
+		clockwork = &dsclock_clockfns;
+		printf(": DS1397\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.
+ */
+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]) + MK_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.
+ */
+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 - MK_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';
+}
+
+#define _DS_GET(off, data) \
+	do { *chiptime = (off); (u_int8_t)(data) = (*chipdata); } while (0)
+#define _DS_SET(off, data) \
+	do { *chiptime = (off); *chipdata = (u_int8_t)(data); } while (0)
+#define _DS_GET_BCD(off, data) \
+	do { \
+		u_int8_t c; \
+		*chiptime = (off); \
+		c = *chipdata; (u_int8_t)(data) = FROMBCD(c); \
+	} while (0)
+#define _DS_SET_BCD(off, data) \
+	do { \
+		*chiptime = (off); \
+		*chipdata = TOBCD((u_int8_t)(data)); \
+	} while (0)
+
+/*
+ * Get the time of day, based on the clock's value and/or the base value.
+ */
+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;
+	volatile u_int8_t *chipdata = (void *)(sc->sc_clock + 1);
+	int s;
+	u_int8_t c;
+
+	s = splclock();
+
+	/* specify 24hr and BCD mode */
+	_DS_GET(DS_REGB, c);
+	c |= DS_REGB_24HR;
+	c &= ~DS_REGB_BINARY;
+	_DS_SET(DS_REGB, c);
+
+	/* update in progress; spin loop */
+	*chiptime = DS_REGA;
+	while (*chipdata & DS_REGA_UIP)
+		;
+
+	_DS_GET_BCD(DS_SEC, dt->dt_sec);
+	_DS_GET_BCD(DS_MIN, dt->dt_min);
+	_DS_GET_BCD(DS_HOUR, dt->dt_hour);
+	_DS_GET_BCD(DS_DOW, dt->dt_wday);
+	_DS_GET_BCD(DS_DOM, dt->dt_day);
+	_DS_GET_BCD(DS_MONTH, dt->dt_mon);
+	_DS_GET_BCD(DS_YEAR, dt->dt_year);
+	dt->dt_year += DS_YEAR0;
+
+	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.
+ */
+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;
+	volatile u_int8_t *chipdata = (void *)(sc->sc_clock + 1);
+	int s;
+	u_int8_t c;
+
+	s = splclock();
+	
+	/* enable write */
+	_DS_GET(DS_REGB, c);
+	c |= DS_REGB_SET;
+	_DS_SET(DS_REGB, c);
+
+	_DS_SET_BCD(DS_SEC, dt->dt_sec);
+	_DS_SET_BCD(DS_MIN, dt->dt_min);
+	_DS_SET_BCD(DS_HOUR, dt->dt_hour);
+	_DS_SET_BCD(DS_DOW, dt->dt_wday);
+	_DS_SET_BCD(DS_DOM, dt->dt_day);
+	_DS_SET_BCD(DS_MONTH, dt->dt_mon);
+	_DS_SET_BCD(DS_YEAR, dt->dt_year - DS_YEAR0);
+
+	_DS_GET(DS_REGB, c);
+	c &= ~DS_REGB_SET;
+	_DS_SET(DS_REGB, c);
+
+	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
+}