1 /* $NetBSD: rtc.c,v 1.20 2011/02/08 20:20:13 rmind Exp $ */ 2 3 /* 4 * Copyright (c) 1988 University of Utah. 5 * Copyright (c) 1982, 1990, 1993 6 * The Regents of the University of California. 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 8.2 (Berkeley) 1/12/94 39 */ 40 41 /* 42 * attachment for HP300 real-time clock (RTC) 43 */ 44 45 #include <sys/cdefs.h> 46 __KERNEL_RCSID(0, "$NetBSD: rtc.c,v 1.20 2011/02/08 20:20:13 rmind Exp $"); 47 48 #include <sys/param.h> 49 #include <sys/systm.h> 50 #include <sys/device.h> 51 #include <sys/malloc.h> 52 53 #include <hp300/dev/intiovar.h> 54 #include <hp300/dev/rtcreg.h> 55 56 #include <dev/clock_subr.h> 57 58 struct rtc_softc { 59 device_t sc_dev; 60 bus_space_tag_t sc_bst; 61 bus_space_handle_t sc_bsh; 62 struct todr_chip_handle sc_handle; 63 }; 64 65 static int rtcmatch(device_t, cfdata_t, void *); 66 static void rtcattach(device_t, device_t, void *aux); 67 68 CFATTACH_DECL_NEW(rtc, sizeof(struct rtc_softc), 69 rtcmatch, rtcattach, NULL, NULL); 70 71 static int rtc_gettime_ymdhms(todr_chip_handle_t, struct clock_ymdhms *); 72 static int rtc_settime_ymdhms(todr_chip_handle_t, struct clock_ymdhms *); 73 static uint8_t rtc_readreg(struct rtc_softc *, int); 74 static uint8_t rtc_writereg(struct rtc_softc *, int, uint8_t); 75 76 77 static int 78 rtcmatch(device_t parent, cfdata_t cf, void *aux) 79 { 80 struct intio_attach_args *ia = aux; 81 82 if (strcmp("rtc", ia->ia_modname) != 0) 83 return 0; 84 85 return 1; 86 } 87 88 static void 89 rtcattach(device_t parent, device_t self, void *aux) 90 { 91 struct rtc_softc *sc = device_private(self); 92 struct intio_attach_args *ia = aux; 93 struct todr_chip_handle *todr_handle; 94 bus_space_tag_t bst = ia->ia_bst; 95 96 sc->sc_dev = self; 97 if (bus_space_map(bst, ia->ia_iobase, INTIO_DEVSIZE, 0, 98 &sc->sc_bsh)) { 99 aprint_error(": can't map registers\n"); 100 return; 101 } 102 103 aprint_normal("\n"); 104 105 sc->sc_bst = bst; 106 107 todr_handle = &sc->sc_handle; 108 todr_handle->cookie = sc; 109 todr_handle->todr_gettime = NULL; 110 todr_handle->todr_settime = NULL; 111 todr_handle->todr_gettime_ymdhms = rtc_gettime_ymdhms; 112 todr_handle->todr_settime_ymdhms = rtc_settime_ymdhms; 113 todr_handle->todr_setwen = NULL; 114 115 todr_attach(todr_handle); 116 } 117 118 static int 119 rtc_gettime_ymdhms(todr_chip_handle_t handle, struct clock_ymdhms *dt) 120 { 121 struct rtc_softc *sc; 122 int i, year; 123 bool read_okay; 124 uint8_t rtc_registers[NUM_RTC_REGS]; 125 126 sc = handle->cookie; 127 128 /* read rtc registers */ 129 read_okay = false; 130 while (!read_okay) { 131 read_okay = true; 132 for (i = 0; i < NUM_RTC_REGS; i++) 133 rtc_registers[i] = rtc_readreg(sc, i); 134 for (i = 0; i < NUM_RTC_REGS; i++) 135 if (rtc_registers[i] != rtc_readreg(sc, i)) 136 read_okay = false; 137 } 138 139 #define rtc_to_decimal(a,b) (rtc_registers[a] * 10 + rtc_registers[b]) 140 141 dt->dt_sec = rtc_to_decimal(1, 0); 142 dt->dt_min = rtc_to_decimal(3, 2); 143 dt->dt_hour = (rtc_registers[5] & RTC_REG5_HOUR) * 10 + 144 rtc_registers[4]; 145 dt->dt_day = rtc_to_decimal(8, 7); 146 dt->dt_mon = rtc_to_decimal(10, 9); 147 148 year = rtc_to_decimal(12, 11) + RTC_BASE_YEAR; 149 if (year < POSIX_BASE_YEAR) 150 year += 100; 151 dt->dt_year = year; 152 153 #undef rtc_to_decimal 154 155 return 0; 156 } 157 158 static int 159 rtc_settime_ymdhms(todr_chip_handle_t handle, struct clock_ymdhms *dt) 160 { 161 struct rtc_softc *sc; 162 int i, year; 163 uint8_t rtc_registers[NUM_RTC_REGS]; 164 165 sc = handle->cookie; 166 year = dt->dt_year - RTC_BASE_YEAR; 167 if (year > 99) 168 year -= 100; 169 170 #define decimal_to_rtc(a,b,n) \ 171 rtc_registers[a] = (n) % 10; \ 172 rtc_registers[b] = (n) / 10; 173 174 decimal_to_rtc(0, 1, dt->dt_sec); 175 decimal_to_rtc(2, 3, dt->dt_min); 176 decimal_to_rtc(7, 8, dt->dt_day); 177 decimal_to_rtc(9, 10, dt->dt_mon); 178 decimal_to_rtc(11, 12, year); 179 180 rtc_registers[4] = dt->dt_hour % 10; 181 rtc_registers[5] = ((dt->dt_hour / 10) & RTC_REG5_HOUR) | RTC_REG5_24HR; 182 183 rtc_registers[6] = 0; 184 185 #undef decimal_to_rtc 186 187 /* write rtc registers */ 188 rtc_writereg(sc, 15, 13); /* reset prescalar */ 189 for (i = 0; i < NUM_RTC_REGS; i++) 190 if (rtc_registers[i] != 191 rtc_writereg(sc, i, rtc_registers[i])) 192 return 1; 193 return 0; 194 } 195 196 static uint8_t 197 rtc_readreg(struct rtc_softc *sc, int reg) 198 { 199 bus_space_tag_t bst = sc->sc_bst; 200 bus_space_handle_t bsh = sc->sc_bsh; 201 uint8_t data; 202 int s = splvm(); 203 204 data = reg; 205 intio_device_writecmd(bst, bsh, RTC_SET_REG, &data, 1); 206 intio_device_readcmd(bst, bsh, RTC_READ_REG, &data); 207 208 splx(s); 209 return data; 210 } 211 212 static uint8_t 213 rtc_writereg(struct rtc_softc *sc, int reg, uint8_t data) 214 { 215 bus_space_tag_t bst = sc->sc_bst; 216 bus_space_handle_t bsh = sc->sc_bsh; 217 uint8_t tmp; 218 int s = splvm(); 219 220 tmp = (data << 4) | reg; 221 intio_device_writecmd(bst, bsh, RTC_SET_REG, &tmp, 1); 222 intio_device_writecmd(bst, bsh, RTC_WRITE_REG, NULL, 0); 223 intio_device_readcmd(bst, bsh, RTC_READ_REG, &tmp); 224 225 splx(s); 226 return tmp; 227 } 228