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