NetBSD-5.0.2/sys/arch/sgimips/mace/mcclock_mace.c
/* $NetBSD: mcclock_mace.c,v 1.8 2007/10/17 19:57:05 garbled Exp $ */
/*
* Copyright (c) 2001 Antti Kantee. All Rights Reserved.
*
* 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 company nor the name of the author may be used to
* endorse or promote products derived from this software without specific
* prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY CAUASLITY LIMITED ``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 CAUSALITY LIMITED 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.
*/
/*
* Copyright (c) 1998 Mark Brinicombe.
* Copyright (c) 1998 Causality Limited.
* All rights reserved.
*
* Written by Mark Brinicombe, Causality Limited
*
* 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 Mark Brinicombe
* for the NetBSD Project.
* 4. The name of the company nor the name of the author may be used to
* endorse or promote products derived from this software without specific
* prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY CAUASLITY LIMITED ``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 CAUSALITY LIMITED 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>
__KERNEL_RCSID(0, "$NetBSD: mcclock_mace.c,v 1.8 2007/10/17 19:57:05 garbled Exp $");
#include <sys/param.h>
#include <sys/systm.h>
#include <machine/cpu.h>
#include <machine/autoconf.h>
#include <machine/bus.h>
#include <machine/machtype.h>
#include <dev/clock_subr.h>
#include <dev/ic/ds1687reg.h>
#include <sgimips/mace/macevar.h>
#include <sgimips/sgimips/clockvar.h>
struct mcclock_mace_softc {
struct device sc_dev;
struct todr_chip_handle sc_todrch;
bus_space_tag_t sc_st;
bus_space_handle_t sc_sh;
};
static struct mcclock_mace_softc *mace0 = NULL;
static int mcclock_mace_match(struct device *, struct cfdata *, void *);
static void mcclock_mace_attach(struct device*, struct device *, void *);
static int mcclock_mace_gettime(struct todr_chip_handle *,
volatile struct timeval *);
static int mcclock_mace_settime(struct todr_chip_handle *,
volatile struct timeval *);
unsigned int ds1687_read(void *arg, unsigned int addr);
void ds1687_write(void *arg, unsigned int addr, unsigned int data);
void mcclock_poweroff(void);
CFATTACH_DECL(mcclock_mace, sizeof(struct mcclock_mace_softc),
mcclock_mace_match, mcclock_mace_attach, NULL, NULL);
static int
mcclock_mace_match(struct device *parent, struct cfdata *match, void *aux)
{
return 1;
}
void
mcclock_mace_attach(struct device *parent, struct device *self, void *aux)
{
struct mcclock_mace_softc *sc = (void *)self;
struct mace_attach_args *maa = aux;
sc->sc_st = maa->maa_st;
/* XXX should be bus_space_map() */
if (bus_space_subregion(maa->maa_st, maa->maa_sh,
maa->maa_offset, 0, &sc->sc_sh))
panic("mcclock_mace_attach: couldn't map");
/*
* We want a fixed format: 24-hour, BCD data, so just force the
* RTC to this mode; if there was junk there we'll be able to
* fix things up later when we discover the time read back is
* no good.
*/
ds1687_write(sc, DS1687_CONTROLA, DS1687_DV1 | DS1687_BANK1);
ds1687_write(sc, DS1687_CONTROLB, DS1687_24HRS);
/* XXXrkb: init kickstart/wakeup stuff */
if (!(ds1687_read(sc, DS1687_CONTROLD) & DS1687_VRT))
printf(": lithium cell is dead, RTC unreliable");
printf("\n");
sc->sc_todrch.cookie = sc;
sc->sc_todrch.todr_gettime = mcclock_mace_gettime;
sc->sc_todrch.todr_settime = mcclock_mace_settime;
sc->sc_todrch.todr_setwen = NULL;
todr_attach(&sc->sc_todrch);
mace0 = sc;
}
/*
* We need to use the following two functions from
* DS1687_PUT/GETTOD(). Hence the names.
*/
unsigned int
ds1687_read(void *arg, unsigned int addr)
{
struct mcclock_mace_softc *sc = (struct mcclock_mace_softc *)arg;
return (bus_space_read_1(sc->sc_st, sc->sc_sh, addr));
}
void
ds1687_write(void *arg, unsigned int addr, unsigned int data)
{
struct mcclock_mace_softc *sc = (struct mcclock_mace_softc *)arg;
bus_space_write_1(sc->sc_st, sc->sc_sh, addr, data);
}
static int
mcclock_mace_gettime(struct todr_chip_handle *todrch,
volatile struct timeval *tv)
{
struct mcclock_mace_softc *sc =
(struct mcclock_mace_softc *)todrch->cookie;
struct clock_ymdhms dt;
ds1687_todregs regs;
int s;
s = splhigh();
DS1687_GETTOD(sc, ®s);
splx(s);
dt.dt_sec = FROMBCD(regs[DS1687_SOFT_SEC]);
dt.dt_min = FROMBCD(regs[DS1687_SOFT_MIN]);
dt.dt_hour = FROMBCD(regs[DS1687_SOFT_HOUR]);
dt.dt_wday = FROMBCD(regs[DS1687_SOFT_DOW]);
dt.dt_day = FROMBCD(regs[DS1687_SOFT_DOM]);
dt.dt_mon = FROMBCD(regs[DS1687_SOFT_MONTH]);
dt.dt_year = FROMBCD(regs[DS1687_SOFT_YEAR]) +
(100 * FROMBCD(regs[DS1687_SOFT_CENTURY]));
/* simple sanity checks */
if (dt.dt_mon > 12 || dt.dt_day > 31 ||
dt.dt_hour >= 24 || dt.dt_min >= 60 || dt.dt_sec >= 60)
return (EIO);
tv->tv_sec = (long)clock_ymdhms_to_secs(&dt);
if (tv->tv_sec == -1)
return (ERANGE);
tv->tv_usec = 0;
return (0);
}
static int
mcclock_mace_settime(struct todr_chip_handle *todrch,
volatile struct timeval *tv)
{
struct mcclock_mace_softc *sc =
(struct mcclock_mace_softc *)todrch->cookie;
struct clock_ymdhms dt;
ds1687_todregs regs;
int s;
clock_secs_to_ymdhms((time_t)(tv->tv_sec + (tv->tv_usec > 500000)),&dt);
memset(®s, 0, sizeof(regs));
regs[DS1687_SOFT_SEC] = TOBCD(dt.dt_sec);
regs[DS1687_SOFT_MIN] = TOBCD(dt.dt_min);
regs[DS1687_SOFT_HOUR] = TOBCD(dt.dt_hour);
regs[DS1687_SOFT_DOW] = TOBCD(dt.dt_wday);
regs[DS1687_SOFT_DOM] = TOBCD(dt.dt_day);
regs[DS1687_SOFT_MONTH] = TOBCD(dt.dt_mon);
regs[DS1687_SOFT_YEAR] = TOBCD(dt.dt_year % 100);
regs[DS1687_SOFT_CENTURY] = TOBCD(dt.dt_year / 100);
s = splhigh();
DS1687_PUTTOD(sc, ®s);
splx(s);
return (0);
}
void
mcclock_poweroff()
{
int s;
uint8_t a, xctl_a, xctl_b;
if (mace0 == NULL)
return;
s = splhigh();
a = ds1687_read(mace0, DS1687_CONTROLA);
a &= ~DS1687_DV2;
a |= DS1687_DV1;
ds1687_write(mace0, DS1687_CONTROLA, a | DS1687_BANK1);
wbflush();
xctl_b = ds1687_read(mace0, DS1687_BANK1_XCTRL4B);
xctl_b |= DS1687_X4B_ABE | DS1687_X4B_KIE;
ds1687_write(mace0, DS1687_BANK1_XCTRL4B, xctl_b);
xctl_a = ds1687_read(mace0, DS1687_BANK1_XCTRL4A);
xctl_a &= ~(DS1687_X4A_RCF | DS1687_X4A_WAF | DS1687_X4A_KF);
ds1687_write(mace0, DS1687_BANK1_XCTRL4A, xctl_a);
wbflush();
/* and down we go */
ds1687_write(mace0, DS1687_BANK1_XCTRL4A, xctl_a | DS1687_X4A_PAB);
ds1687_write(mace0, DS1687_CONTROLA, a);
wbflush();
while(1);
}