a34kbbc.c revision 1.13 1 /* $NetBSD: a34kbbc.c,v 1.13 2003/08/07 16:26:39 agc Exp $ */
2
3 /*
4 * Copyright (c) 1982, 1990 The Regents of the University of California.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to Berkeley by
8 * the Systems Programming Group of the University of Utah Computer
9 * Science Department.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 *
35 * from: Utah $Hdr: clock.c 1.18 91/01/21$
36 *
37 * @(#)clock.c 7.6 (Berkeley) 5/7/91
38 */
39
40 /*
41 * Copyright (c) 1988 University of Utah.
42 *
43 * This code is derived from software contributed to Berkeley by
44 * the Systems Programming Group of the University of Utah Computer
45 * Science Department.
46 *
47 * Redistribution and use in source and binary forms, with or without
48 * modification, are permitted provided that the following conditions
49 * are met:
50 * 1. Redistributions of source code must retain the above copyright
51 * notice, this list of conditions and the following disclaimer.
52 * 2. Redistributions in binary form must reproduce the above copyright
53 * notice, this list of conditions and the following disclaimer in the
54 * documentation and/or other materials provided with the distribution.
55 * 3. All advertising materials mentioning features or use of this software
56 * must display the following acknowledgement:
57 * This product includes software developed by the University of
58 * California, Berkeley and its contributors.
59 * 4. Neither the name of the University nor the names of its contributors
60 * may be used to endorse or promote products derived from this software
61 * without specific prior written permission.
62 *
63 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
64 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
65 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
66 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
67 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
68 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
69 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
70 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
71 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
72 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
73 * SUCH DAMAGE.
74 *
75 * from: Utah $Hdr: clock.c 1.18 91/01/21$
76 *
77 * @(#)clock.c 7.6 (Berkeley) 5/7/91
78 */
79
80 #include <sys/cdefs.h>
81 __KERNEL_RCSID(0, "$NetBSD: a34kbbc.c,v 1.13 2003/08/07 16:26:39 agc Exp $");
82
83 #include <sys/param.h>
84 #include <sys/kernel.h>
85 #include <sys/device.h>
86 #include <sys/systm.h>
87 #include <machine/psl.h>
88 #include <machine/cpu.h>
89 #include <amiga/amiga/device.h>
90 #include <amiga/amiga/custom.h>
91 #include <amiga/amiga/cia.h>
92 #include <amiga/dev/rtc.h>
93 #include <amiga/dev/zbusvar.h>
94
95 #include <dev/clock_subr.h>
96
97 int a34kbbc_match(struct device *, struct cfdata *, void *);
98 void a34kbbc_attach(struct device *, struct device *, void *);
99
100 CFATTACH_DECL(a34kbbc, sizeof(struct device),
101 a34kbbc_match, a34kbbc_attach, NULL, NULL);
102
103 void *a34kclockaddr;
104 int a34kugettod(struct timeval *);
105 int a34kusettod(struct timeval *);
106
107 int
108 a34kbbc_match(struct device *pdp, struct cfdata *cfp, void *auxp)
109 {
110 static int a34kbbc_matched = 0;
111
112 if (!matchname("a34kbbc", auxp))
113 return(0);
114
115 /* Allow only once instance. */
116 if (a34kbbc_matched)
117 return(0);
118
119 if (!(is_a3000() || is_a4000()))
120 return(0);
121
122 a34kclockaddr = (void *)ztwomap(0xdc0000);
123 if (a34kugettod(0) == 0)
124 return(0);
125
126 a34kbbc_matched = 1;
127 return(1);
128 }
129
130 /*
131 * Attach us to the rtc function pointers.
132 */
133 void
134 a34kbbc_attach(struct device *pdp, struct device *dp, void *auxp)
135 {
136 printf("\n");
137 a34kclockaddr = (void *)ztwomap(0xdc0000);
138
139 ugettod = a34kugettod;
140 usettod = a34kusettod;
141 }
142
143 int
144 a34kugettod(struct timeval *tvp)
145 {
146 struct rtclock3000 *rt;
147 struct clock_ymdhms dt;
148 time_t secs;
149
150 rt = a34kclockaddr;
151
152 /* hold clock */
153 rt->control1 = A3CONTROL1_HOLD_CLOCK;
154
155 /* Copy the info. Careful about the order! */
156 dt.dt_sec = rt->second1 * 10 + rt->second2;
157 dt.dt_min = rt->minute1 * 10 + rt->minute2;
158 dt.dt_hour = rt->hour1 * 10 + rt->hour2;
159 dt.dt_wday = rt->weekday;
160 dt.dt_day = rt->day1 * 10 + rt->day2;
161 dt.dt_mon = rt->month1 * 10 + rt->month2;
162 dt.dt_year = rt->year1 * 10 + rt->year2;
163
164 dt.dt_year += CLOCK_BASE_YEAR;
165 /* let it run again.. */
166 rt->control1 = A3CONTROL1_FREE_CLOCK;
167
168 if (dt.dt_year < STARTOFTIME)
169 dt.dt_year += 100;
170
171
172 if ((dt.dt_hour > 23) ||
173 (dt.dt_wday > 6) ||
174 (dt.dt_day > 31) ||
175 (dt.dt_mon > 12) ||
176 /* (dt.dt_year < STARTOFTIME) || */ (dt.dt_year > 2036))
177 return (0);
178
179 secs = clock_ymdhms_to_secs(&dt);
180 if (tvp)
181 tvp->tv_sec = secs;
182 return (1);
183 }
184
185 int
186 a34kusettod(struct timeval *tvp)
187 {
188 struct rtclock3000 *rt;
189 struct clock_ymdhms dt;
190 time_t secs;
191
192 rt = a34kclockaddr;
193 secs = tvp->tv_sec;
194 /*
195 * there seem to be problems with the bitfield addressing
196 * currently used..
197 */
198
199 if (! rt)
200 return (0);
201
202 clock_secs_to_ymdhms(secs, &dt);
203
204 rt->control1 = A3CONTROL1_HOLD_CLOCK; /* implies mode 0 */
205 rt->second1 = dt.dt_sec / 10;
206 rt->second2 = dt.dt_sec % 10;
207 rt->minute1 = dt.dt_min / 10;
208 rt->minute2 = dt.dt_min % 10;
209 rt->hour1 = dt.dt_hour / 10;
210 rt->hour2 = dt.dt_hour % 10;
211 rt->weekday = dt.dt_wday;
212 rt->day1 = dt.dt_day / 10;
213 rt->day2 = dt.dt_day % 10;
214 rt->month1 = dt.dt_mon / 10;
215 rt->month2 = dt.dt_mon % 10;
216 rt->year1 = (dt.dt_year / 10) % 10;
217 rt->year2 = dt.dt_year % 10;
218 rt->control1 = A3CONTROL1_HOLD_CLOCK | 1; /* mode 1 registers */
219 rt->leapyear = dt.dt_year; /* XXX implicit % 4 */
220 rt->control1 = A3CONTROL1_FREE_CLOCK; /* implies mode 1 */
221
222 return (1);
223 }
224