1 /* $NetBSD: iopi2c.c,v 1.7 2012/01/10 18:55:37 jakllsch Exp $ */ 2 3 /* 4 * Copyright (c) 2003 Wasabi Systems, Inc. 5 * All rights reserved. 6 * 7 * Written by Jason R. Thorpe for Wasabi Systems, Inc. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 3. All advertising materials mentioning features or use of this software 18 * must display the following acknowledgement: 19 * This product includes software developed for the NetBSD Project by 20 * Wasabi Systems, Inc. 21 * 4. The name of Wasabi Systems, Inc. may not be used to endorse 22 * or promote products derived from this software without specific prior 23 * written permission. 24 * 25 * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND 26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 27 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 28 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC 29 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 30 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 31 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 33 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 34 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 35 * POSSIBILITY OF SUCH DAMAGE. 36 */ 37 38 /* 39 * Intel i80321 I/O Processor I2C Controller Unit support. 40 */ 41 42 #include <sys/cdefs.h> 43 __KERNEL_RCSID(0, "$NetBSD: iopi2c.c,v 1.7 2012/01/10 18:55:37 jakllsch Exp $"); 44 45 #include <sys/param.h> 46 #include <sys/mutex.h> 47 #include <sys/systm.h> 48 #include <sys/device.h> 49 #include <sys/kernel.h> 50 51 #include <sys/bus.h> 52 #include <machine/intr.h> 53 54 #include <dev/i2c/i2cvar.h> 55 56 #include <arm/xscale/iopi2creg.h> 57 #include <arm/xscale/iopi2cvar.h> 58 59 static int iopiic_acquire_bus(void *, int); 60 static void iopiic_release_bus(void *, int); 61 62 static int iopiic_send_start(void *, int); 63 static int iopiic_send_stop(void *, int); 64 static int iopiic_initiate_xfer(void *, uint16_t, int); 65 static int iopiic_read_byte(void *, uint8_t *, int); 66 static int iopiic_write_byte(void *, uint8_t, int); 67 68 void 69 iopiic_attach(struct iopiic_softc *sc) 70 { 71 struct i2cbus_attach_args iba; 72 73 sc->sc_i2c.ic_cookie = sc; 74 sc->sc_i2c.ic_acquire_bus = iopiic_acquire_bus; 75 sc->sc_i2c.ic_release_bus = iopiic_release_bus; 76 sc->sc_i2c.ic_send_start = iopiic_send_start; 77 sc->sc_i2c.ic_send_stop = iopiic_send_stop; 78 sc->sc_i2c.ic_initiate_xfer = iopiic_initiate_xfer; 79 sc->sc_i2c.ic_read_byte = iopiic_read_byte; 80 sc->sc_i2c.ic_write_byte = iopiic_write_byte; 81 82 iba.iba_tag = &sc->sc_i2c; 83 (void) config_found_ia(sc->sc_dev, "i2cbus", &iba, iicbus_print); 84 } 85 86 static int 87 iopiic_acquire_bus(void *cookie, int flags) 88 { 89 struct iopiic_softc *sc = cookie; 90 91 /* XXX What should we do for the polling case? */ 92 if (flags & I2C_F_POLL) 93 return (0); 94 95 mutex_enter(&sc->sc_buslock); 96 return (0); 97 } 98 99 static void 100 iopiic_release_bus(void *cookie, int flags) 101 { 102 struct iopiic_softc *sc = cookie; 103 104 /* XXX See above. */ 105 if (flags & I2C_F_POLL) 106 return; 107 108 mutex_exit(&sc->sc_buslock); 109 } 110 111 #define IOPIIC_TIMEOUT 100 /* protocol timeout, in uSecs */ 112 113 static int 114 iopiic_wait(struct iopiic_softc *sc, int bit, int flags) 115 { 116 uint32_t isr; 117 int timeout, error=0; 118 119 /* XXX We never sleep, we always poll. Fix me. */ 120 121 /* 122 * For some reason, we seem to run into problems if we poll 123 * the ISR while the transfer is in progress--at least on the 124 * i80312. The condition that we're looking for never seems 125 * to appear on a read, and it's not clear why; perhaps reads 126 * of the I2C register file interfere with its proper operation? 127 * For now, just delay for a while up front. 128 * 129 * We _really_ need this to be interrupt-driven, but a problem 130 * with that is that the i80312 has no way to mask interrupts... 131 * So we need to deal with that. For DMA and AAU, too, for that 132 * matter. 133 * Note that delay(100) doesn't quite work on the npwr w/ m41t00. 134 */ 135 delay(110); 136 for (timeout = IOPIIC_TIMEOUT; timeout != 0; timeout--) { 137 isr = bus_space_read_4(sc->sc_st, sc->sc_sh, IIC_ISR); 138 if (isr & (bit | IIC_ISR_BED)) 139 break; 140 delay(1); 141 } 142 143 if (isr & (IIC_ISR_BED | (bit & IIC_ISR_ALD))) 144 error = EIO; 145 else if (isr & (bit & ~IIC_ISR_ALD)) 146 error = 0; 147 else 148 error = ETIMEDOUT; 149 150 if (error) 151 device_printf(sc->sc_dev, 152 "iopiic_wait, (%08x) error %d: ISR = 0x%08x\n", 153 bit, error, isr); 154 155 /* 156 * The IIC_ISR is Read/Clear apart from the bottom 4 bits, which are 157 * read-only. So simply write back our copy of the ISR to clear any 158 * latched status. 159 */ 160 bus_space_write_4(sc->sc_st, sc->sc_sh, IIC_ISR, isr); 161 162 return (error); 163 } 164 165 static int 166 iopiic_send_start(void *cookie, int flags) 167 { 168 struct iopiic_softc *sc = cookie; 169 170 /* 171 * This may only work in conjunction with a data transfer; 172 * we might need to un-export the "start" primitive. 173 */ 174 bus_space_write_4(sc->sc_st, sc->sc_sh, IIC_ICR, 175 sc->sc_icr | IIC_ICR_START); 176 delay(IOPIIC_TIMEOUT); 177 178 return (0); 179 } 180 181 static int 182 iopiic_send_stop(void *cookie, int flags) 183 { 184 struct iopiic_softc *sc = cookie; 185 186 /* 187 * The STOP bit is only used in conjunction with 188 * a data transfer, so we need to use MA in this 189 * case. 190 * 191 * Consider adding an I2C_F_STOP so we can 192 * do a read-with-STOP and write-with-STOP. 193 */ 194 bus_space_write_4(sc->sc_st, sc->sc_sh, IIC_ICR, 195 sc->sc_icr | IIC_ICR_MA); 196 delay(IOPIIC_TIMEOUT); 197 198 return (0); 199 } 200 201 static int 202 iopiic_initiate_xfer(void *cookie, uint16_t addr, int flags) 203 { 204 struct iopiic_softc *sc = cookie; 205 int error, rd_req = (flags & I2C_F_READ) != 0; 206 uint32_t idbr; 207 208 /* We only support 7-bit addressing. */ 209 if ((addr & 0x78) == 0x78) 210 return (EINVAL); 211 212 idbr = (addr << 1) | (rd_req ? 1 : 0); 213 bus_space_write_4(sc->sc_st, sc->sc_sh, IIC_IDBR, idbr); 214 bus_space_write_4(sc->sc_st, sc->sc_sh, IIC_ICR, 215 sc->sc_icr | IIC_ICR_START | IIC_ICR_TB); 216 217 error = iopiic_wait(sc, IIC_ISR_ITE, flags); 218 #if 0 219 if (error) 220 device_printf(sc->sc_dev, "failed to initiate %s xfer\n", 221 rd_req ? "read" : "write"); 222 #endif 223 return (error); 224 } 225 226 static int 227 iopiic_read_byte(void *cookie, uint8_t *bytep, int flags) 228 { 229 struct iopiic_softc *sc = cookie; 230 int error, last_byte = (flags & I2C_F_LAST) != 0, 231 send_stop = (flags & I2C_F_STOP) != 0; 232 233 bus_space_write_4(sc->sc_st, sc->sc_sh, IIC_ICR, 234 sc->sc_icr | IIC_ICR_TB | (last_byte ? IIC_ICR_NACK : 0) | 235 (send_stop ? IIC_ICR_STOP : 0)); 236 if ((error = iopiic_wait(sc, IIC_ISR_IRF | IIC_ISR_ALD, flags)) == 0) 237 *bytep = bus_space_read_4(sc->sc_st, sc->sc_sh, IIC_IDBR); 238 #if 0 239 if (error) 240 device_printf(sc->sc_dev, "read byte failed\n"); 241 #endif 242 243 return (error); 244 } 245 246 static int 247 iopiic_write_byte(void *cookie, uint8_t byte, int flags) 248 { 249 struct iopiic_softc *sc = cookie; 250 int error, send_stop = (flags & I2C_F_STOP) != 0; 251 252 bus_space_write_4(sc->sc_st, sc->sc_sh, IIC_IDBR, byte); 253 bus_space_write_4(sc->sc_st, sc->sc_sh, IIC_ICR, 254 sc->sc_icr | IIC_ICR_TB | (send_stop ? IIC_ICR_STOP : 0)); 255 error = iopiic_wait(sc, IIC_ISR_ITE | IIC_ISR_ALD, flags); 256 257 #if 0 258 if (error) 259 device_printf(sc->sc_dev, "write byte failed\n"); 260 #endif 261 262 return (error); 263 } 264