clock.c revision 1.2.2.2 1 1.2.2.2 gmcgarry /* $NetBSD: clock.c,v 1.2.2.2 2001/11/08 07:01:34 gmcgarry Exp $ */
2 1.2.2.2 gmcgarry
3 1.2.2.2 gmcgarry /*
4 1.2.2.2 gmcgarry * Copyright (c) 1988 University of Utah.
5 1.2.2.2 gmcgarry * Copyright (c) 1982, 1990, 1993
6 1.2.2.2 gmcgarry * The Regents of the University of California. All rights reserved.
7 1.2.2.2 gmcgarry *
8 1.2.2.2 gmcgarry * This code is derived from software contributed to Berkeley by
9 1.2.2.2 gmcgarry * the Systems Programming Group of the University of Utah Computer
10 1.2.2.2 gmcgarry * Science Department.
11 1.2.2.2 gmcgarry *
12 1.2.2.2 gmcgarry * Redistribution and use in source and binary forms, with or without
13 1.2.2.2 gmcgarry * modification, are permitted provided that the following conditions
14 1.2.2.2 gmcgarry * are met:
15 1.2.2.2 gmcgarry * 1. Redistributions of source code must retain the above copyright
16 1.2.2.2 gmcgarry * notice, this list of conditions and the following disclaimer.
17 1.2.2.2 gmcgarry * 2. Redistributions in binary form must reproduce the above copyright
18 1.2.2.2 gmcgarry * notice, this list of conditions and the following disclaimer in the
19 1.2.2.2 gmcgarry * documentation and/or other materials provided with the distribution.
20 1.2.2.2 gmcgarry * 3. All advertising materials mentioning features or use of this software
21 1.2.2.2 gmcgarry * must display the following acknowledgement:
22 1.2.2.2 gmcgarry * This product includes software developed by the University of
23 1.2.2.2 gmcgarry * California, Berkeley and its contributors.
24 1.2.2.2 gmcgarry * 4. Neither the name of the University nor the names of its contributors
25 1.2.2.2 gmcgarry * may be used to endorse or promote products derived from this software
26 1.2.2.2 gmcgarry * without specific prior written permission.
27 1.2.2.2 gmcgarry *
28 1.2.2.2 gmcgarry * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29 1.2.2.2 gmcgarry * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30 1.2.2.2 gmcgarry * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31 1.2.2.2 gmcgarry * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32 1.2.2.2 gmcgarry * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33 1.2.2.2 gmcgarry * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34 1.2.2.2 gmcgarry * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35 1.2.2.2 gmcgarry * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36 1.2.2.2 gmcgarry * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37 1.2.2.2 gmcgarry * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 1.2.2.2 gmcgarry * SUCH DAMAGE.
39 1.2.2.2 gmcgarry *
40 1.2.2.2 gmcgarry * from: Utah $Hdr: clock.c 1.18 91/01/21$
41 1.2.2.2 gmcgarry *
42 1.2.2.2 gmcgarry * @(#)clock.c 8.2 (Berkeley) 1/12/94
43 1.2.2.2 gmcgarry */
44 1.2.2.2 gmcgarry
45 1.2.2.2 gmcgarry #include <sys/param.h>
46 1.2.2.2 gmcgarry
47 1.2.2.2 gmcgarry #include <hp300/dev/hilreg.h>
48 1.2.2.2 gmcgarry
49 1.2.2.2 gmcgarry #define FEBRUARY 2
50 1.2.2.2 gmcgarry #define STARTOFTIME 1970
51 1.2.2.2 gmcgarry #define SECDAY 86400L
52 1.2.2.2 gmcgarry #define SECYR (SECDAY * 365)
53 1.2.2.2 gmcgarry
54 1.2.2.2 gmcgarry #define BBC_SET_REG 0xe0
55 1.2.2.2 gmcgarry #define BBC_WRITE_REG 0xc2
56 1.2.2.2 gmcgarry #define BBC_READ_REG 0xc3
57 1.2.2.2 gmcgarry #define NUM_BBC_REGS 12
58 1.2.2.2 gmcgarry
59 1.2.2.2 gmcgarry #define leapyear(year) ((year) % 4 == 0)
60 1.2.2.2 gmcgarry #define range_test(n, l, h) if ((n) < (l) || (n) > (h)) return(0)
61 1.2.2.2 gmcgarry #define days_in_year(a) (leapyear(a) ? 366 : 365)
62 1.2.2.2 gmcgarry #define days_in_month(a) (month_days[(a) - 1])
63 1.2.2.2 gmcgarry #define bbc_to_decimal(a,b) (bbc_registers[a] * 10 + bbc_registers[b])
64 1.2.2.2 gmcgarry
65 1.2.2.2 gmcgarry #include <hp300/stand/common/samachdep.h>
66 1.2.2.2 gmcgarry
67 1.2.2.2 gmcgarry static int month_days[12] = {
68 1.2.2.2 gmcgarry 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31
69 1.2.2.2 gmcgarry };
70 1.2.2.2 gmcgarry
71 1.2.2.2 gmcgarry u_char bbc_registers[13];
72 1.2.2.2 gmcgarry u_char read_bbc_reg();
73 1.2.2.2 gmcgarry struct hil_dev *bbcaddr = BBCADDR;
74 1.2.2.2 gmcgarry
75 1.2.2.2 gmcgarry getsecs()
76 1.2.2.2 gmcgarry {
77 1.2.2.2 gmcgarry static int bbcinited = 0;
78 1.2.2.2 gmcgarry u_long timbuf = 0;
79 1.2.2.2 gmcgarry
80 1.2.2.2 gmcgarry if (!bbc_to_gmt(&timbuf) && !bbcinited)
81 1.2.2.2 gmcgarry printf("WARNING: bad date in battery clock\n");
82 1.2.2.2 gmcgarry bbcinited = 1;
83 1.2.2.2 gmcgarry
84 1.2.2.2 gmcgarry /* Battery clock does not store usec's, so forget about it. */
85 1.2.2.2 gmcgarry return(timbuf);
86 1.2.2.2 gmcgarry }
87 1.2.2.2 gmcgarry
88 1.2.2.2 gmcgarry
89 1.2.2.2 gmcgarry bbc_to_gmt(timbuf)
90 1.2.2.2 gmcgarry u_long *timbuf;
91 1.2.2.2 gmcgarry {
92 1.2.2.2 gmcgarry register int i;
93 1.2.2.2 gmcgarry register u_long tmp;
94 1.2.2.2 gmcgarry int year, month, day, hour, min, sec;
95 1.2.2.2 gmcgarry
96 1.2.2.2 gmcgarry read_bbc();
97 1.2.2.2 gmcgarry
98 1.2.2.2 gmcgarry sec = bbc_to_decimal(1, 0);
99 1.2.2.2 gmcgarry min = bbc_to_decimal(3, 2);
100 1.2.2.2 gmcgarry
101 1.2.2.2 gmcgarry /*
102 1.2.2.2 gmcgarry * Hours are different for some reason. Makes no sense really.
103 1.2.2.2 gmcgarry */
104 1.2.2.2 gmcgarry hour = ((bbc_registers[5] & 0x03) * 10) + bbc_registers[4];
105 1.2.2.2 gmcgarry day = bbc_to_decimal(8, 7);
106 1.2.2.2 gmcgarry month = bbc_to_decimal(10, 9);
107 1.2.2.2 gmcgarry year = bbc_to_decimal(12, 11) + 1900;
108 1.2.2.2 gmcgarry
109 1.2.2.2 gmcgarry range_test(hour, 0, 23);
110 1.2.2.2 gmcgarry range_test(day, 1, 31);
111 1.2.2.2 gmcgarry range_test(month, 1, 12);
112 1.2.2.2 gmcgarry range_test(year, STARTOFTIME, 2000);
113 1.2.2.2 gmcgarry
114 1.2.2.2 gmcgarry tmp = 0;
115 1.2.2.2 gmcgarry
116 1.2.2.2 gmcgarry for (i = STARTOFTIME; i < year; i++)
117 1.2.2.2 gmcgarry tmp += days_in_year(i);
118 1.2.2.2 gmcgarry if (leapyear(year) && month > FEBRUARY)
119 1.2.2.2 gmcgarry tmp++;
120 1.2.2.2 gmcgarry
121 1.2.2.2 gmcgarry for (i = 1; i < month; i++)
122 1.2.2.2 gmcgarry tmp += days_in_month(i);
123 1.2.2.2 gmcgarry
124 1.2.2.2 gmcgarry tmp += (day - 1);
125 1.2.2.2 gmcgarry tmp = ((tmp * 24 + hour) * 60 + min) * 60 + sec;
126 1.2.2.2 gmcgarry
127 1.2.2.2 gmcgarry *timbuf = tmp;
128 1.2.2.2 gmcgarry return(1);
129 1.2.2.2 gmcgarry }
130 1.2.2.2 gmcgarry
131 1.2.2.2 gmcgarry read_bbc()
132 1.2.2.2 gmcgarry {
133 1.2.2.2 gmcgarry register int i, read_okay;
134 1.2.2.2 gmcgarry
135 1.2.2.2 gmcgarry read_okay = 0;
136 1.2.2.2 gmcgarry while (!read_okay) {
137 1.2.2.2 gmcgarry read_okay = 1;
138 1.2.2.2 gmcgarry for (i = 0; i <= NUM_BBC_REGS; i++)
139 1.2.2.2 gmcgarry bbc_registers[i] = read_bbc_reg(i);
140 1.2.2.2 gmcgarry for (i = 0; i <= NUM_BBC_REGS; i++)
141 1.2.2.2 gmcgarry if (bbc_registers[i] != read_bbc_reg(i))
142 1.2.2.2 gmcgarry read_okay = 0;
143 1.2.2.2 gmcgarry }
144 1.2.2.2 gmcgarry }
145 1.2.2.2 gmcgarry
146 1.2.2.2 gmcgarry u_char
147 1.2.2.2 gmcgarry read_bbc_reg(reg)
148 1.2.2.2 gmcgarry int reg;
149 1.2.2.2 gmcgarry {
150 1.2.2.2 gmcgarry u_char data = reg;
151 1.2.2.2 gmcgarry
152 1.2.2.2 gmcgarry if (bbcaddr) {
153 1.2.2.2 gmcgarry #if 0
154 1.2.2.2 gmcgarry send_hil_cmd(bbcaddr, BBC_SET_REG, &data, 1, NULL);
155 1.2.2.2 gmcgarry send_hil_cmd(bbcaddr, BBC_READ_REG, NULL, 0, &data);
156 1.2.2.2 gmcgarry #else
157 1.2.2.2 gmcgarry HILWAIT(bbcaddr);
158 1.2.2.2 gmcgarry bbcaddr->hil_cmd = BBC_SET_REG;
159 1.2.2.2 gmcgarry HILWAIT(bbcaddr);
160 1.2.2.2 gmcgarry bbcaddr->hil_data = data;
161 1.2.2.2 gmcgarry HILWAIT(bbcaddr);
162 1.2.2.2 gmcgarry bbcaddr->hil_cmd = BBC_READ_REG;
163 1.2.2.2 gmcgarry HILDATAWAIT(bbcaddr);
164 1.2.2.2 gmcgarry data = bbcaddr->hil_data;
165 1.2.2.2 gmcgarry #endif
166 1.2.2.2 gmcgarry }
167 1.2.2.2 gmcgarry return(data);
168 1.2.2.2 gmcgarry }
169