1 /* $NetBSD: motoi2c.c,v 1.17 2025/09/16 11:55:17 thorpej Exp $ */ 2 3 /*- 4 * Copyright (c) 2007, 2010 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Matt Thomas. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 #include <sys/cdefs.h> 33 __KERNEL_RCSID(0, "$NetBSD: motoi2c.c,v 1.17 2025/09/16 11:55:17 thorpej Exp $"); 34 35 #include <sys/param.h> 36 #include <sys/device.h> 37 #include <sys/systm.h> 38 #include <sys/mutex.h> 39 #include <sys/bus.h> 40 #include <sys/intr.h> 41 42 #include <dev/i2c/i2cvar.h> 43 #include <dev/i2c/motoi2creg.h> 44 #include <dev/i2c/motoi2cvar.h> 45 46 #ifdef DEBUG 47 int motoi2c_debug = 0; 48 #define DPRINTF(x) if (motoi2c_debug) printf x 49 #else 50 #define DPRINTF(x) 51 #endif 52 53 static int motoi2c_acquire_bus(void *, int); 54 static void motoi2c_release_bus(void *, int); 55 static int motoi2c_exec(void *, i2c_op_t, i2c_addr_t, const void *, size_t, 56 void *, size_t, int); 57 static void motoi2c_clear_status(struct motoi2c_softc *, uint8_t); 58 static int motoi2c_busy_wait(struct motoi2c_softc *, uint8_t); 59 60 static const struct motoi2c_settings motoi2c_default_settings = { 61 .i2c_adr = MOTOI2C_ADR_DEFAULT, 62 .i2c_fdr = MOTOI2C_FDR_DEFAULT, 63 .i2c_dfsrr = MOTOI2C_DFSRR_DEFAULT, 64 }; 65 66 #define I2C_READ(r) ((*sc->sc_iord)(sc, (r))) 67 #define I2C_WRITE(r,v) ((*sc->sc_iowr)(sc, (r), (v))) 68 #define I2C_SETCLR(r, s, c) \ 69 ((*sc->sc_iowr)(sc, (r), ((*sc->sc_iord)(sc, (r)) | (s)) & ~(c))) 70 71 static uint8_t 72 motoi2c_iord1(struct motoi2c_softc *sc, bus_size_t off) 73 { 74 return bus_space_read_1(sc->sc_iot, sc->sc_ioh, off); 75 } 76 77 static void 78 motoi2c_iowr1(struct motoi2c_softc *sc, bus_size_t off, uint8_t data) 79 { 80 bus_space_write_1(sc->sc_iot, sc->sc_ioh, off, data); 81 } 82 83 void 84 motoi2c_attach(struct motoi2c_softc *sc, 85 const struct motoi2c_settings *settings) 86 { 87 if (settings == NULL) { 88 sc->sc_settings = motoi2c_default_settings; 89 } else { 90 sc->sc_settings = *settings; 91 } 92 if (sc->sc_iord == NULL) 93 sc->sc_iord = motoi2c_iord1; 94 if (sc->sc_iowr == NULL) 95 sc->sc_iowr = motoi2c_iowr1; 96 97 iic_tag_init(&sc->sc_i2c); 98 sc->sc_i2c.ic_cookie = sc; 99 sc->sc_i2c.ic_acquire_bus = motoi2c_acquire_bus; 100 sc->sc_i2c.ic_release_bus = motoi2c_release_bus; 101 sc->sc_i2c.ic_exec = motoi2c_exec; 102 103 if ((sc->sc_flags & MOTOI2C_F_ENABLE_INV) != 0) { 104 sc->sc_enable_mask = 0; 105 sc->sc_disable_mask = CR_MEN; 106 } else { 107 sc->sc_enable_mask = CR_MEN; 108 sc->sc_disable_mask = 0; 109 } 110 111 I2C_WRITE(I2CCR, sc->sc_disable_mask); /* reset before config */ 112 I2C_WRITE(I2CDFSRR, sc->sc_settings.i2c_dfsrr); /* sampling units */ 113 I2C_WRITE(I2CFDR, sc->sc_settings.i2c_fdr); /* divider 3072 */ 114 I2C_WRITE(I2CADR, sc->sc_settings.i2c_adr); /* our slave address */ 115 motoi2c_clear_status(sc, I2C_READ(I2CSR)); 116 117 iicbus_attach(sc->sc_dev, &sc->sc_i2c); 118 } 119 120 static int 121 motoi2c_acquire_bus(void *v, int flags) 122 { 123 struct motoi2c_softc * const sc = v; 124 125 I2C_WRITE(I2CCR, sc->sc_enable_mask); /* enable the I2C module */ 126 127 return 0; 128 } 129 130 static void 131 motoi2c_release_bus(void *v, int flags) 132 { 133 struct motoi2c_softc * const sc = v; 134 135 I2C_WRITE(I2CCR, sc->sc_disable_mask); /* disable the I2C module */ 136 } 137 138 static int 139 motoi2c_stop_wait(struct motoi2c_softc *sc) 140 { 141 u_int timo; 142 int error = 0; 143 144 timo = 1000; 145 while ((I2C_READ(I2CSR) & SR_MBB) != 0 && --timo) 146 DELAY(1); 147 148 if (timo == 0) { 149 DPRINTF(("%s: timeout (sr=%#x)\n", __func__, I2C_READ(I2CSR))); 150 error = ETIMEDOUT; 151 } 152 153 return error; 154 } 155 156 static void 157 motoi2c_clear_status(struct motoi2c_softc *sc, uint8_t sr) 158 { 159 if ((sc->sc_flags & MOTOI2C_F_STATUS_W1C) != 0) { 160 I2C_WRITE(I2CSR, sr); 161 } else { 162 I2C_WRITE(I2CSR, 0); 163 } 164 } 165 166 /* busy waiting for byte data transfer completion */ 167 static int 168 motoi2c_busy_wait(struct motoi2c_softc *sc, uint8_t cr) 169 { 170 uint8_t sr; 171 u_int timo; 172 int error = 0; 173 174 timo = 1000; 175 while (((sr = I2C_READ(I2CSR)) & SR_MIF) == 0 && --timo) 176 DELAY(10); 177 178 if (timo == 0) { 179 DPRINTF(("%s: timeout (sr=%#x, cr=%#x)\n", 180 __func__, sr, I2C_READ(I2CCR))); 181 error = ETIMEDOUT; 182 } 183 /* 184 * RXAK is only valid when transmitting. 185 */ 186 if ((cr & CR_MTX) && (sr & SR_RXAK)) { 187 DPRINTF(("%s: missing rx ack (%#x): spin=%u\n", 188 __func__, sr, 1000 - timo)); 189 error = EIO; 190 } 191 motoi2c_clear_status(sc, sr); 192 return error; 193 } 194 195 int 196 motoi2c_intr(void *v) 197 { 198 struct motoi2c_softc * const sc = v; 199 200 panic("%s(%p)", __func__, sc); 201 202 return 0; 203 } 204 205 int 206 motoi2c_exec(void *v, i2c_op_t op, i2c_addr_t addr, 207 const void *cmdbuf, size_t cmdlen, 208 void *databuf, size_t datalen, 209 int flags) 210 { 211 struct motoi2c_softc * const sc = v; 212 uint8_t sr; 213 uint8_t cr; 214 int error; 215 216 sr = I2C_READ(I2CSR); 217 cr = I2C_READ(I2CCR); 218 219 #if 0 220 DPRINTF(("%s(%#x,%#x,%p,%zu,%p,%zu,%#x): sr=%#x cr=%#x\n", 221 __func__, op, addr, cmdbuf, cmdlen, databuf, datalen, flags, 222 sr, cr)); 223 #endif 224 225 if ((cr & CR_MSTA) == 0 && (sr & SR_MBB) != 0) { 226 /* wait for bus becoming available */ 227 error = motoi2c_stop_wait(sc); 228 if (error) 229 return ETIMEDOUT; 230 } 231 232 /* reset interrupt and arbitration-lost flags (all others are RO) */ 233 motoi2c_clear_status(sc, sr); 234 sr = I2C_READ(I2CSR); 235 236 /* 237 * Generate start condition 238 */ 239 cr = sc->sc_enable_mask | CR_MTX | CR_MSTA; 240 I2C_WRITE(I2CCR, cr); 241 242 DPRINTF(("%s: started: sr=%#x cr=%#x/%#x\n", 243 __func__, I2C_READ(I2CSR), cr, I2C_READ(I2CCR))); 244 245 sr = I2C_READ(I2CSR); 246 if (sr & SR_MAL) { 247 DPRINTF(("%s: lost bus: sr=%#x cr=%#x/%#x\n", 248 __func__, I2C_READ(I2CSR), cr, I2C_READ(I2CCR))); 249 I2C_WRITE(I2CCR, sc->sc_disable_mask); 250 DELAY(10); 251 I2C_WRITE(I2CCR, sc->sc_enable_mask | CR_MTX | CR_MSTA); 252 DELAY(10); 253 sr = I2C_READ(I2CSR); 254 if (sr & SR_MAL) { 255 error = EBUSY; 256 goto out; 257 } 258 DPRINTF(("%s: reacquired bus: sr=%#x cr=%#x/%#x\n", 259 __func__, I2C_READ(I2CSR), cr, I2C_READ(I2CCR))); 260 } 261 262 /* send target address and transfer direction */ 263 uint8_t addr_byte = (addr << 1) 264 | (cmdlen == 0 && I2C_OP_READ_P(op) ? 1 : 0); 265 I2C_WRITE(I2CDR, addr_byte); 266 267 error = motoi2c_busy_wait(sc, cr); 268 if (error) { 269 DPRINTF(("%s: error sending address: %d\n", __func__, error)); 270 if (error == EIO) 271 error = ENXIO; 272 goto out; 273 } 274 275 const uint8_t *cmdptr = cmdbuf; 276 for (size_t i = 0; i < cmdlen; i++) { 277 I2C_WRITE(I2CDR, *cmdptr++); 278 279 error = motoi2c_busy_wait(sc, cr); 280 if (error) { 281 DPRINTF(("%s: error sending cmd byte %zu (cr=%#x/%#x):" 282 " %d\n", __func__, i, I2C_READ(I2CCR), cr, error)); 283 goto out; 284 } 285 } 286 287 if (cmdlen > 0 && I2C_OP_READ_P(op)) { 288 KASSERT(cr & CR_MTX); 289 KASSERT((cr & CR_TXAK) == 0); 290 I2C_WRITE(I2CCR, cr | CR_RSTA); 291 #if 0 292 DPRINTF(("%s: restarted(read): sr=%#x cr=%#x(%#x)\n", 293 __func__, I2C_READ(I2CSR), cr | CR_RSTA, I2C_READ(I2CCR))); 294 #endif 295 296 /* send target address and read transfer direction */ 297 addr_byte |= 1; 298 I2C_WRITE(I2CDR, addr_byte); 299 300 error = motoi2c_busy_wait(sc, cr); 301 if (error) { 302 if (error == EIO) 303 error = ENXIO; 304 goto out; 305 } 306 } 307 308 if (I2C_OP_READ_P(op)) { 309 uint8_t *dataptr = databuf; 310 cr &= ~CR_MTX; /* clear transmit flags */ 311 if (datalen <= 1) 312 cr |= CR_TXAK; 313 I2C_WRITE(I2CCR, cr); 314 DELAY(10); 315 (void)I2C_READ(I2CDR); /* dummy read */ 316 for (size_t i = 0; i < datalen; i++) { 317 /* 318 * If a master receiver wants to terminate a data 319 * transfer, it must inform the slave transmitter by 320 * not acknowledging the last byte of data (by setting 321 * the transmit acknowledge bit (I2CCR[TXAK])) before 322 * reading the next-to-last byte of data. 323 */ 324 error = motoi2c_busy_wait(sc, cr); 325 if (error) { 326 DPRINTF(("%s: error reading byte %zu: %d\n", 327 __func__, i, error)); 328 goto out; 329 } 330 if (i == datalen - 2) { 331 cr |= CR_TXAK; 332 I2C_WRITE(I2CCR, cr); 333 } else if (i == datalen - 1 && I2C_OP_STOP_P(op)) { 334 cr = sc->sc_enable_mask | CR_TXAK; 335 I2C_WRITE(I2CCR, cr); 336 } 337 *dataptr++ = I2C_READ(I2CDR); 338 } 339 if (datalen == 0) { 340 if (I2C_OP_STOP_P(op)) { 341 cr = sc->sc_enable_mask | CR_TXAK; 342 I2C_WRITE(I2CCR, cr); 343 } 344 (void)I2C_READ(I2CDR); /* dummy read */ 345 error = motoi2c_busy_wait(sc, cr); 346 if (error) { 347 DPRINTF(("%s: error reading dummy last byte:" 348 "%d\n", __func__, error)); 349 goto out; 350 } 351 } 352 } else { 353 const uint8_t *dataptr = databuf; 354 for (size_t i = 0; i < datalen; i++) { 355 I2C_WRITE(I2CDR, *dataptr++); 356 error = motoi2c_busy_wait(sc, cr); 357 if (error) { 358 DPRINTF(("%s: error sending data byte %zu:" 359 " %d\n", __func__, i, error)); 360 goto out; 361 } 362 } 363 } 364 365 out: 366 /* 367 * If we encountered an error condition or caller wants a STOP, 368 * send a STOP. 369 */ 370 if (error || (cr & CR_TXAK) || ((cr & CR_MSTA) && I2C_OP_STOP_P(op))) { 371 cr = sc->sc_enable_mask; 372 I2C_WRITE(I2CCR, cr); 373 motoi2c_stop_wait(sc); 374 DPRINTF(("%s: stopping: cr=%#x/%#x\n", __func__, 375 cr, I2C_READ(I2CCR))); 376 } 377 378 DPRINTF(("%s: exit sr=%#x cr=%#x: %d\n", __func__, 379 I2C_READ(I2CSR), I2C_READ(I2CCR), error)); 380 381 return error; 382 } 383
Indexes created Sat Sep 20 22:09:52 GMT 2025