Moved to /cvsroot/syssrc/sys/arch/arc/arc/clock.c,v
This commit is contained in:
parent
1dd228d78b
commit
25088da318
|
@ -1,314 +0,0 @@
|
|||
/* $NetBSD: clock.c,v 1.7 1998/01/12 20:04:30 thorpej Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 1988 University of Utah.
|
||||
* Copyright (c) 1992, 1993
|
||||
* The Regents of the University of California. All rights reserved.
|
||||
*
|
||||
* This code is derived from software contributed to Berkeley by
|
||||
* the Systems Programming Group of the University of Utah Computer
|
||||
* Science Department and Ralph Campbell.
|
||||
*
|
||||
* 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 University of
|
||||
* California, Berkeley and its contributors.
|
||||
* 4. Neither the name of the University 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 REGENTS 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 REGENTS 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.
|
||||
*
|
||||
* from: Utah Hdr: clock.c 1.18 91/01/21
|
||||
*
|
||||
* from: @(#)clock.c 8.1 (Berkeley) 6/10/93
|
||||
*/
|
||||
|
||||
#include <sys/param.h>
|
||||
#include <sys/kernel.h>
|
||||
#include <sys/systm.h>
|
||||
#include <sys/device.h>
|
||||
|
||||
#include <machine/autoconf.h>
|
||||
#include <machine/machConst.h>
|
||||
#include <pica/pica/clockvar.h>
|
||||
#include <pica/pica/picatype.h>
|
||||
|
||||
|
||||
extern int cputype; /* What kind of cpu we are running on */
|
||||
|
||||
/* Definition of the driver for autoconfig. */
|
||||
static int clockmatch __P((struct device *, void *, void *));
|
||||
static void clockattach __P((struct device *, struct device *, void *));
|
||||
|
||||
struct cfattach clock_ca = {
|
||||
sizeof(struct clock_softc), clockmatch, clockattach
|
||||
};
|
||||
|
||||
extern struct cfdriver clock_cd;
|
||||
|
||||
void mcclock_attach __P((struct device *, struct device *, void *));
|
||||
|
||||
#define SECMIN ((unsigned)60) /* seconds per minute */
|
||||
#define SECHOUR ((unsigned)(60*SECMIN)) /* seconds per hour */
|
||||
#define SECDAY ((unsigned)(24*SECHOUR)) /* seconds per day */
|
||||
#define SECYR ((unsigned)(365*SECDAY)) /* seconds per common year */
|
||||
|
||||
#define LEAPYEAR(year) (((year) % 4) == 0)
|
||||
|
||||
static int
|
||||
clockmatch(parent, cfdata, aux)
|
||||
struct device *parent;
|
||||
void *cfdata;
|
||||
void *aux;
|
||||
{
|
||||
struct cfdata *cf = cfdata;
|
||||
struct confargs *ca = aux;
|
||||
|
||||
/* See how many clocks this system has */
|
||||
switch (cputype) {
|
||||
|
||||
case MIPS_PICA_61:
|
||||
/* make sure that we're looking for this type of device. */
|
||||
if (!BUS_MATCHNAME(ca, "dallas_rtc"))
|
||||
return (0);
|
||||
|
||||
if (cf->cf_unit >= 1)
|
||||
return (0);
|
||||
|
||||
break;
|
||||
|
||||
default:
|
||||
panic("unknown CPU");
|
||||
}
|
||||
|
||||
return (1);
|
||||
}
|
||||
|
||||
static void
|
||||
clockattach(parent, self, aux)
|
||||
struct device *parent;
|
||||
struct device *self;
|
||||
void *aux;
|
||||
{
|
||||
|
||||
switch (cputype) {
|
||||
|
||||
case MIPS_PICA_61:
|
||||
mcclock_attach(parent, self, aux);
|
||||
break;
|
||||
|
||||
default:
|
||||
panic("clockattach: it didn't get here. really.");
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* establish the clock interrupt; it's a special case
|
||||
*/
|
||||
BUS_INTR_ESTABLISH((struct confargs *)aux,
|
||||
(intr_handler_t) hardclock, self);
|
||||
|
||||
printf("\n");
|
||||
}
|
||||
|
||||
/*
|
||||
* Wait "n" microseconds. This doesn't belong here. XXX.
|
||||
*/
|
||||
void
|
||||
delay(n)
|
||||
int n;
|
||||
{
|
||||
DELAY(n);
|
||||
}
|
||||
|
||||
/*
|
||||
* Machine-dependent clock routines.
|
||||
*
|
||||
* Startrtclock restarts the real-time clock, which provides
|
||||
* hardclock interrupts to kern_clock.c.
|
||||
*
|
||||
* Inittodr initializes the time of day hardware which provides
|
||||
* date functions. Its primary function is to use some file
|
||||
* system information in case the hardare clock lost state.
|
||||
*
|
||||
* Resettodr restores the time of day hardware after a time change.
|
||||
*/
|
||||
|
||||
|
||||
/*
|
||||
* Start the real-time and statistics clocks. Leave stathz 0 since there
|
||||
* are no other timers available.
|
||||
*/
|
||||
void
|
||||
cpu_initclocks()
|
||||
{
|
||||
extern int tickadj;
|
||||
struct clock_softc *csc = (struct clock_softc *)clock_cd.cd_devs[0];
|
||||
|
||||
hz = 100; /* 100 Hz */
|
||||
tick = 1000000 / hz; /* number of micro-seconds between interrupts */
|
||||
|
||||
/*
|
||||
* Start the clock.
|
||||
*/
|
||||
(*csc->sc_init)(csc);
|
||||
}
|
||||
|
||||
/*
|
||||
* We assume newhz is either stathz or profhz, and that neither will
|
||||
* change after being set up above. Could recalculate intervals here
|
||||
* but that would be a drag.
|
||||
*/
|
||||
void
|
||||
setstatclockrate(newhz)
|
||||
int newhz;
|
||||
{
|
||||
}
|
||||
|
||||
/*
|
||||
* This code is defunct after 2099.
|
||||
* Will Unix still be here then??
|
||||
*/
|
||||
static short dayyr[12] = {
|
||||
0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334
|
||||
};
|
||||
|
||||
/*
|
||||
* Initialze the time of day register, based on the time base which is, e.g.
|
||||
* from a filesystem. Base provides the time to within six months,
|
||||
* and the time of year clock (if any) provides the rest.
|
||||
*/
|
||||
void
|
||||
inittodr(base)
|
||||
time_t base;
|
||||
{
|
||||
struct tod_time c;
|
||||
struct clock_softc *csc = (struct clock_softc *)clock_cd.cd_devs[0];
|
||||
register int days, yr;
|
||||
long deltat;
|
||||
int badbase, s;
|
||||
|
||||
if (base < 5*SECYR) {
|
||||
printf("WARNING: preposterous time in file system");
|
||||
/* read the system clock anyway */
|
||||
base = 6*SECYR + 186*SECDAY + SECDAY/2;
|
||||
badbase = 1;
|
||||
} else
|
||||
badbase = 0;
|
||||
|
||||
/* Read RTC chip registers */
|
||||
(*csc->sc_get)(csc, base, &c);
|
||||
|
||||
csc->sc_initted = 1;
|
||||
|
||||
/* simple sanity checks */
|
||||
c.year = c.year+80; /* must be multiple of 4 because chip knows leap */
|
||||
if (c.year < 70 || c.mon < 1 || c.mon > 12 || c.day < 1 ||
|
||||
c.day > 31 || c.hour > 23 || c.min > 59 || c.sec > 59) {
|
||||
/*
|
||||
* Believe the time in the file system for lack of
|
||||
* anything better, resetting the TODR.
|
||||
*/
|
||||
time.tv_sec = base;
|
||||
if (!badbase) {
|
||||
printf("WARNING: preposterous clock chip time\n");
|
||||
resettodr();
|
||||
}
|
||||
goto bad;
|
||||
}
|
||||
days = 0;
|
||||
for (yr = 70; yr < c.year; yr++)
|
||||
days += LEAPYEAR(yr) ? 366 : 365;
|
||||
days += dayyr[c.mon - 1] + c.day - 1;
|
||||
if (LEAPYEAR(yr) && c.mon > 2)
|
||||
days++;
|
||||
/* now have days since Jan 1, 1970; the rest is easy... */
|
||||
time.tv_sec = days * SECDAY + c.hour * 3600 + c.min * 60 + c.sec;
|
||||
|
||||
if (!badbase) {
|
||||
/*
|
||||
* See if we gained/lost two or more days;
|
||||
* if so, assume something is amiss.
|
||||
*/
|
||||
deltat = time.tv_sec - base;
|
||||
if (deltat < 0)
|
||||
deltat = -deltat;
|
||||
if (deltat < 2 * SECDAY)
|
||||
return;
|
||||
printf("WARNING: clock %s %d days",
|
||||
time.tv_sec < base ? "lost" : "gained", deltat / SECDAY);
|
||||
}
|
||||
bad:
|
||||
printf(" -- CHECK AND RESET THE DATE!\n");
|
||||
}
|
||||
|
||||
/*
|
||||
* Reset the TODR based on the time value; used when the TODR
|
||||
* has a preposterous value and also when the time is reset
|
||||
* by the stime system call. Also called when the TODR goes past
|
||||
* TODRZERO + 100*(SECYEAR+2*SECDAY) (e.g. on Jan 2 just after midnight)
|
||||
* to wrap the TODR around.
|
||||
*/
|
||||
void
|
||||
resettodr()
|
||||
{
|
||||
struct tod_time c;
|
||||
struct clock_softc *csc = (struct clock_softc *)clock_cd.cd_devs[0];
|
||||
register int t, t2;
|
||||
int s;
|
||||
|
||||
if(!csc->sc_initted)
|
||||
return;
|
||||
|
||||
/* compute the day of week. 1 is Sunday*/
|
||||
t2 = time.tv_sec / SECDAY;
|
||||
c.dow = (t2 + 5) % 7; /* 1/1/1970 was thursday */
|
||||
|
||||
/* compute the year */
|
||||
t2 = time.tv_sec / SECDAY;
|
||||
c.year = 69;
|
||||
while (t2 >= 0) { /* whittle off years */
|
||||
t = t2;
|
||||
c.year++;
|
||||
t2 -= LEAPYEAR(c.year) ? 366 : 365;
|
||||
}
|
||||
|
||||
/* t = month + day; separate */
|
||||
t2 = LEAPYEAR(c.year);
|
||||
for (c.mon = 1; c.mon < 12; c.mon++)
|
||||
if (t < dayyr[c.mon] + (t2 && c.mon > 1))
|
||||
break;
|
||||
|
||||
c.day = t - dayyr[c.mon - 1] + 1;
|
||||
if (t2 && c.mon > 2)
|
||||
c.day--;
|
||||
|
||||
/* the rest is easy */
|
||||
t = time.tv_sec % SECDAY;
|
||||
c.hour = t / 3600;
|
||||
t %= 3600;
|
||||
c.min = t / 60;
|
||||
c.sec = t % 60;
|
||||
c.year = c.year-80; /* must be multiple of 4 because chip knows leap */
|
||||
|
||||
(*csc->sc_set)(csc, &c);
|
||||
}
|
Loading…
Reference in New Issue