clock.c revision 1.1 1 1.1 chuck /* $NetBSD: clock.c,v 1.1 1995/07/25 23:12:28 chuck Exp $ */
2 1.1 chuck
3 1.1 chuck /*
4 1.1 chuck * Copyright (c) 1992, 1993
5 1.1 chuck * The Regents of the University of California. All rights reserved.
6 1.1 chuck * Copyright (c) 1994 Gordon W. Ross
7 1.1 chuck * Copyright (c) 1993 Adam Glass
8 1.1 chuck *
9 1.1 chuck * This software was developed by the Computer Systems Engineering group
10 1.1 chuck * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
11 1.1 chuck * contributed to Berkeley.
12 1.1 chuck *
13 1.1 chuck * All advertising materials mentioning features or use of this software
14 1.1 chuck * must display the following acknowledgement:
15 1.1 chuck * This product includes software developed by the University of
16 1.1 chuck * California, Lawrence Berkeley Laboratory.
17 1.1 chuck *
18 1.1 chuck * Redistribution and use in source and binary forms, with or without
19 1.1 chuck * modification, are permitted provided that the following conditions
20 1.1 chuck * are met:
21 1.1 chuck * 1. Redistributions of source code must retain the above copyright
22 1.1 chuck * notice, this list of conditions and the following disclaimer.
23 1.1 chuck * 2. Redistributions in binary form must reproduce the above copyright
24 1.1 chuck * notice, this list of conditions and the following disclaimer in the
25 1.1 chuck * documentation and/or other materials provided with the distribution.
26 1.1 chuck * 3. All advertising materials mentioning features or use of this software
27 1.1 chuck * must display the following acknowledgement:
28 1.1 chuck * This product includes software developed by the University of
29 1.1 chuck * California, Berkeley and its contributors.
30 1.1 chuck * 4. Neither the name of the University nor the names of its contributors
31 1.1 chuck * may be used to endorse or promote products derived from this software
32 1.1 chuck * without specific prior written permission.
33 1.1 chuck *
34 1.1 chuck * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
35 1.1 chuck * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
36 1.1 chuck * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
37 1.1 chuck * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
38 1.1 chuck * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
39 1.1 chuck * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
40 1.1 chuck * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
41 1.1 chuck * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
42 1.1 chuck * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
43 1.1 chuck * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
44 1.1 chuck * SUCH DAMAGE.
45 1.1 chuck *
46 1.1 chuck * @(#)clock.c 8.1 (Berkeley) 6/11/93
47 1.1 chuck */
48 1.1 chuck
49 1.1 chuck /*
50 1.1 chuck * Clock driver.
51 1.1 chuck */
52 1.1 chuck
53 1.1 chuck #include "sboot.h"
54 1.1 chuck #include "clockreg.h"
55 1.1 chuck static struct clockreg *clockreg = (struct clockreg *) CLOCK_ADDR;
56 1.1 chuck
57 1.1 chuck /*
58 1.1 chuck * BCD to decimal and decimal to BCD.
59 1.1 chuck */
60 1.1 chuck #define FROMBCD(x) (((x) >> 4) * 10 + ((x) & 0xf))
61 1.1 chuck #define TOBCD(x) (((x) / 10 * 16) + ((x) % 10))
62 1.1 chuck
63 1.1 chuck #define SECDAY (24 * 60 * 60)
64 1.1 chuck #define SECYR (SECDAY * 365)
65 1.1 chuck #define LEAPYEAR(y) (((y) & 3) == 0)
66 1.1 chuck
67 1.1 chuck /*
68 1.1 chuck * This code is defunct after 2068.
69 1.1 chuck * Will Unix still be here then??
70 1.1 chuck */
71 1.1 chuck const short dayyr[12] =
72 1.1 chuck { 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334 };
73 1.1 chuck
74 1.1 chuck static u_long chiptotime(sec, min, hour, day, mon, year)
75 1.1 chuck register int sec, min, hour, day, mon, year;
76 1.1 chuck {
77 1.1 chuck register int days, yr;
78 1.1 chuck
79 1.1 chuck sec = FROMBCD(sec);
80 1.1 chuck min = FROMBCD(min);
81 1.1 chuck hour = FROMBCD(hour);
82 1.1 chuck day = FROMBCD(day);
83 1.1 chuck mon = FROMBCD(mon);
84 1.1 chuck year = FROMBCD(year) + YEAR0;
85 1.1 chuck if (year < 70) year = 70;
86 1.1 chuck
87 1.1 chuck /* simple sanity checks */
88 1.1 chuck if (year < 70 || mon < 1 || mon > 12 || day < 1 || day > 31)
89 1.1 chuck return (0);
90 1.1 chuck days = 0;
91 1.1 chuck for (yr = 70; yr < year; yr++)
92 1.1 chuck days += LEAPYEAR(yr) ? 366 : 365;
93 1.1 chuck days += dayyr[mon - 1] + day - 1;
94 1.1 chuck if (LEAPYEAR(yr) && mon > 2)
95 1.1 chuck days++;
96 1.1 chuck /* now have days since Jan 1, 1970; the rest is easy... */
97 1.1 chuck return (days * SECDAY + hour * 3600 + min * 60 + sec);
98 1.1 chuck }
99 1.1 chuck
100 1.1 chuck /*
101 1.1 chuck * Set up the system's time, given a `reasonable' time value.
102 1.1 chuck */
103 1.1 chuck u_long time()
104 1.1 chuck {
105 1.1 chuck register struct clockreg *cl = clockreg;
106 1.1 chuck int sec, min, hour, day, mon, year;
107 1.1 chuck
108 1.1 chuck cl->cl_csr |= CLK_READ; /* enable read (stop time) */
109 1.1 chuck sec = cl->cl_sec;
110 1.1 chuck min = cl->cl_min;
111 1.1 chuck hour = cl->cl_hour;
112 1.1 chuck day = cl->cl_mday;
113 1.1 chuck mon = cl->cl_month;
114 1.1 chuck year = cl->cl_year;
115 1.1 chuck cl->cl_csr &= ~CLK_READ; /* time wears on */
116 1.1 chuck return(chiptotime(sec, min, hour, day, mon, year));
117 1.1 chuck }
118