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