1 /* $NetBSD: a2kbbc.c,v 1.20 2006/09/11 17:18:00 gdamore 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: a2kbbc.c,v 1.20 2006/09/11 17:18:00 gdamore 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 a2kbbc_match(struct device *, struct cfdata *, void *); 98 void a2kbbc_attach(struct device *, struct device *, void *); 99 100 CFATTACH_DECL(a2kbbc, sizeof(struct device), 101 a2kbbc_match, a2kbbc_attach, NULL, NULL); 102 103 void *a2kclockaddr; 104 int a2kugettod(todr_chip_handle_t, struct clock_ymdhms *); 105 int a2kusettod(todr_chip_handle_t, struct clock_ymdhms *); 106 static struct todr_chip_handle a2ktodr; 107 108 int 109 a2kbbc_match(struct device *pdp, struct cfdata *cfp, void *auxp) 110 { 111 static int a2kbbc_matched = 0; 112 113 if (!matchname("a2kbbc", auxp)) 114 return (0); 115 116 /* Allow only one instance. */ 117 if (a2kbbc_matched) 118 return (0); 119 120 if (/* is_a1200() || */ is_a3000() || is_a4000() 121 #ifdef DRACO 122 || is_draco() 123 #endif 124 ) 125 return (0); 126 127 a2kclockaddr = (void *)__UNVOLATILE(ztwomap(0xdc0000)); 128 if (a2kugettod(&a2ktodr, 0) != 0) 129 return (0); 130 131 a2kbbc_matched = 1; 132 return (1); 133 } 134 135 /* 136 * Attach us to the rtc function pointers. 137 */ 138 void 139 a2kbbc_attach(struct device *pdp, struct device *dp, void *auxp) 140 { 141 printf("\n"); 142 a2kclockaddr = (void *)__UNVOLATILE(ztwomap(0xdc0000)); 143 144 a2ktodr.cookie = a2kclockaddr; 145 a2ktodr.todr_gettime_ymdhms = a2kugettod; 146 a2ktodr.todr_settime_ymdhms = a2kusettod; 147 todr_attach(&a2ktodr); 148 } 149 150 int 151 a2kugettod(todr_chip_handle_t h, struct clock_ymdhms *dt) 152 { 153 struct rtclock2000 *rt; 154 int i; 155 156 rt = a2kclockaddr; 157 158 /* 159 * hold clock 160 */ 161 rt->control1 |= A2CONTROL1_HOLD; 162 i = 0x1000; 163 while (rt->control1 & A2CONTROL1_BUSY && i--) 164 ; 165 if (rt->control1 & A2CONTROL1_BUSY) 166 return (ENXIO); /* Give up and say it's not there */ 167 168 /* Copy the info. Careful about the order! */ 169 dt->dt_sec = rt->second1 * 10 + rt->second2; 170 dt->dt_min = rt->minute1 * 10 + rt->minute2; 171 dt->dt_hour = (rt->hour1 & 3) * 10 + rt->hour2; 172 dt->dt_day = rt->day1 * 10 + rt->day2; 173 dt->dt_mon = rt->month1 * 10 + rt->month2; 174 dt->dt_year = rt->year1 * 10 + rt->year2; 175 dt->dt_wday = rt->weekday; 176 177 /* 178 * The oki clock chip has a register to put the clock into 179 * 12/24h mode. 180 * 181 * clockmode | A2HOUR1_PM 182 * 24h 12h | am = 0, pm = 1 183 * --------------------------------- 184 * 0 12 | 0 185 * 1 1 | 0 186 * .. .. | 0 187 * 11 11 | 0 188 * 12 12 | 1 189 * 13 1 | 1 190 * .. .. | 1 191 * 23 11 | 1 192 * 193 */ 194 195 if ((rt->control3 & A2CONTROL3_24HMODE) == 0) { 196 if ((rt->hour1 & A2HOUR1_PM) == 0 && dt->dt_hour == 12) 197 dt->dt_hour = 0; 198 else if ((rt->hour1 & A2HOUR1_PM) && dt->dt_hour != 12) 199 dt->dt_hour += 12; 200 } 201 202 /* 203 * release the clock 204 */ 205 rt->control1 &= ~A2CONTROL1_HOLD; 206 207 dt->dt_year += CLOCK_BASE_YEAR; 208 if (dt->dt_year < STARTOFTIME) 209 dt->dt_year += 100; 210 211 /* 212 * Note that this check is redundant with one in kern_todr.c, but 213 * attach relies on it being here. 214 */ 215 if ((dt->dt_hour > 23) || 216 (dt->dt_day > 31) || 217 (dt->dt_mon > 12) || 218 /* (dt->dt_year < STARTOFTIME) || */ (dt->dt_year > 2036)) 219 return (EINVAL); 220 221 return (0); 222 } 223 224 int 225 a2kusettod(todr_chip_handle_t h, struct clock_ymdhms *dt) 226 { 227 struct rtclock2000 *rt; 228 int ampm, i; 229 230 rt = a2kclockaddr; 231 /* 232 * there seem to be problems with the bitfield addressing 233 * currently used.. 234 */ 235 if (! rt) 236 return (ENXIO); 237 238 /* 239 * hold clock 240 */ 241 rt->control1 |= A2CONTROL1_HOLD; 242 i = 0x1000; 243 while (rt->control1 & A2CONTROL1_BUSY && i--) 244 ; 245 if (rt->control1 & A2CONTROL1_BUSY) 246 return (ENXIO); /* Give up and say it's not there */ 247 248 ampm = 0; 249 if ((rt->control3 & A2CONTROL3_24HMODE) == 0) { 250 if (dt->dt_hour >= 12) { 251 ampm = A2HOUR1_PM; 252 if (dt->dt_hour != 12) 253 dt->dt_hour -= 12; 254 } else if (dt->dt_hour == 0) { 255 dt->dt_hour = 12; 256 } 257 } 258 rt->hour1 = (dt->dt_hour / 10) | ampm; 259 rt->hour2 = dt->dt_hour % 10; 260 rt->second1 = dt->dt_sec / 10; 261 rt->second2 = dt->dt_sec % 10; 262 rt->minute1 = dt->dt_min / 10; 263 rt->minute2 = dt->dt_min % 10; 264 rt->day1 = dt->dt_day / 10; 265 rt->day2 = dt->dt_day % 10; 266 rt->month1 = dt->dt_mon / 10; 267 rt->month2 = dt->dt_mon % 10; 268 rt->year1 = (dt->dt_year / 10) % 10; 269 rt->year2 = dt->dt_year % 10; 270 rt->weekday = dt->dt_wday; 271 272 /* 273 * release the clock 274 */ 275 rt->control2 &= ~A2CONTROL1_HOLD; 276 277 return (0); 278 } 279