1 /* $NetBSD: amdpm_smbus.c,v 1.19 2012/10/27 17:18:28 chs Exp $ */ 2 3 /* 4 * Copyright (c) 2005 Anil Gopinath (anil_public@yahoo.com) 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. The name of the author may not be used to endorse or promote products 16 * derived from this software without specific prior written permission. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 20 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 21 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 23 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 24 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED 25 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, 26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28 * SUCH DAMAGE. 29 */ 30 31 /* driver for SMBUS 1.0 host controller found in the 32 * AMD-8111 HyperTransport I/O Hub 33 */ 34 #include <sys/cdefs.h> 35 __KERNEL_RCSID(0, "$NetBSD: amdpm_smbus.c,v 1.19 2012/10/27 17:18:28 chs Exp $"); 36 37 #include <sys/param.h> 38 #include <sys/systm.h> 39 #include <sys/kernel.h> 40 #include <sys/device.h> 41 #include <sys/rnd.h> 42 #include <sys/mutex.h> 43 44 #include <dev/pci/pcireg.h> 45 #include <dev/pci/pcivar.h> 46 #include <dev/pci/pcidevs.h> 47 48 #include <dev/i2c/i2cvar.h> 49 #include <dev/i2c/i2c_bitbang.h> 50 51 #include <dev/pci/amdpmreg.h> 52 #include <dev/pci/amdpmvar.h> 53 54 #include <dev/pci/amdpm_smbusreg.h> 55 56 static int amdpm_smbus_acquire_bus(void *, int); 57 static void amdpm_smbus_release_bus(void *, int); 58 static int amdpm_smbus_exec(void *, i2c_op_t, i2c_addr_t, const void *, 59 size_t, void *, size_t, int); 60 static int amdpm_smbus_check_done(struct amdpm_softc *, i2c_op_t); 61 static void amdpm_smbus_clear_gsr(struct amdpm_softc *); 62 static uint16_t amdpm_smbus_get_gsr(struct amdpm_softc *); 63 static int amdpm_smbus_quick(struct amdpm_softc *, i2c_op_t); 64 static int amdpm_smbus_send_1(struct amdpm_softc *, uint8_t, i2c_op_t); 65 static int amdpm_smbus_write_1(struct amdpm_softc *, uint8_t, 66 uint8_t, i2c_op_t); 67 static int amdpm_smbus_receive_1(struct amdpm_softc *, i2c_op_t); 68 static int amdpm_smbus_read_1(struct amdpm_softc *sc, uint8_t, i2c_op_t); 69 70 void 71 amdpm_smbus_attach(struct amdpm_softc *sc) 72 { 73 struct i2cbus_attach_args iba; 74 75 /* register with iic */ 76 sc->sc_i2c.ic_cookie = sc; 77 sc->sc_i2c.ic_acquire_bus = amdpm_smbus_acquire_bus; 78 sc->sc_i2c.ic_release_bus = amdpm_smbus_release_bus; 79 sc->sc_i2c.ic_send_start = NULL; 80 sc->sc_i2c.ic_send_stop = NULL; 81 sc->sc_i2c.ic_initiate_xfer = NULL; 82 sc->sc_i2c.ic_read_byte = NULL; 83 sc->sc_i2c.ic_write_byte = NULL; 84 sc->sc_i2c.ic_exec = amdpm_smbus_exec; 85 86 mutex_init(&sc->sc_mutex, MUTEX_DEFAULT, IPL_NONE); 87 88 iba.iba_tag = &sc->sc_i2c; 89 (void)config_found_ia(sc->sc_dev, "i2cbus", &iba, iicbus_print); 90 } 91 92 static int 93 amdpm_smbus_acquire_bus(void *cookie, int flags) 94 { 95 struct amdpm_softc *sc = cookie; 96 97 mutex_enter(&sc->sc_mutex); 98 return 0; 99 } 100 101 static void 102 amdpm_smbus_release_bus(void *cookie, int flags) 103 { 104 struct amdpm_softc *sc = cookie; 105 106 mutex_exit(&sc->sc_mutex); 107 } 108 109 static int 110 amdpm_smbus_exec(void *cookie, i2c_op_t op, i2c_addr_t addr, const void *cmd, 111 size_t cmdlen, void *vbuf, size_t buflen, int flags) 112 { 113 struct amdpm_softc *sc = (struct amdpm_softc *) cookie; 114 sc->sc_smbus_slaveaddr = addr; 115 uint8_t *p = vbuf; 116 int rv; 117 118 if ((cmdlen == 0) && (buflen == 0)) 119 return amdpm_smbus_quick(sc, op); 120 121 if (I2C_OP_READ_P(op) && (cmdlen == 0) && (buflen == 1)) { 122 rv = amdpm_smbus_receive_1(sc, op); 123 if (rv == -1) 124 return -1; 125 *p = (uint8_t)rv; 126 return 0; 127 } 128 129 if ((I2C_OP_READ_P(op)) && (cmdlen == 1) && (buflen == 1)) { 130 rv = amdpm_smbus_read_1(sc, *(const uint8_t *)cmd, op); 131 if (rv == -1) 132 return -1; 133 *p = (uint8_t)rv; 134 return 0; 135 } 136 137 if ((I2C_OP_WRITE_P(op)) && (cmdlen == 0) && (buflen == 1)) 138 return amdpm_smbus_send_1(sc, *(uint8_t*)vbuf, op); 139 140 if ((I2C_OP_WRITE_P(op)) && (cmdlen == 1) && (buflen == 1)) 141 return amdpm_smbus_write_1(sc, 142 *(const uint8_t*)cmd, 143 *(uint8_t*)vbuf, 144 op); 145 146 return -1; 147 } 148 149 static int 150 amdpm_smbus_check_done(struct amdpm_softc *sc, i2c_op_t op) 151 { 152 int i; 153 154 for (i = 0; i < 1000; i++) { 155 /* check gsr and wait till cycle is done */ 156 uint16_t data = amdpm_smbus_get_gsr(sc); 157 if (data & AMDPM_8111_GSR_CYCLE_DONE) 158 return 0; 159 } 160 161 if (!(op & I2C_F_POLL)) 162 delay(1); 163 164 return -1; 165 } 166 167 168 static void 169 amdpm_smbus_clear_gsr(struct amdpm_softc *sc) 170 { 171 /* clear register */ 172 uint16_t data = 0xFFFF; 173 int off = (sc->sc_nforce ? 0xe0 : 0); 174 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 175 AMDPM_8111_SMBUS_STAT - off, data); 176 } 177 178 static uint16_t 179 amdpm_smbus_get_gsr(struct amdpm_softc *sc) 180 { 181 int off = (sc->sc_nforce ? 0xe0 : 0); 182 return bus_space_read_2(sc->sc_iot, sc->sc_ioh, 183 AMDPM_8111_SMBUS_STAT - off); 184 } 185 186 static int 187 amdpm_smbus_quick(struct amdpm_softc *sc, i2c_op_t op) 188 { 189 uint16_t data = 0; 190 int off = (sc->sc_nforce ? 0xe0 : 0); 191 192 /* first clear gsr */ 193 amdpm_smbus_clear_gsr(sc); 194 195 /* write smbus slave address and read/write bit to register */ 196 data = sc->sc_smbus_slaveaddr; 197 data <<= 1; 198 if (I2C_OP_READ_P(op)) 199 data |= AMDPM_8111_SMBUS_READ; 200 201 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 202 AMDPM_8111_SMBUS_HOSTADDR - off, data); 203 204 /* host start */ 205 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 206 AMDPM_8111_SMBUS_CTRL - off, 207 AMDPM_8111_SMBUS_GSR_QUICK); 208 209 return amdpm_smbus_check_done(sc, op); 210 } 211 212 static int 213 amdpm_smbus_send_1(struct amdpm_softc *sc, uint8_t val, i2c_op_t op) 214 { 215 uint16_t data = 0; 216 int off = (sc->sc_nforce ? 0xe0 : 0); 217 218 /* first clear gsr */ 219 amdpm_smbus_clear_gsr(sc); 220 221 /* write smbus slave address to register */ 222 data = sc->sc_smbus_slaveaddr; 223 data <<= 1; 224 data |= AMDPM_8111_SMBUS_SEND; 225 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 226 AMDPM_8111_SMBUS_HOSTADDR - off, data); 227 228 data = val; 229 /* store data */ 230 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 231 AMDPM_8111_SMBUS_HOSTDATA - off, data); 232 /* host start */ 233 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 234 AMDPM_8111_SMBUS_CTRL - off, 235 AMDPM_8111_SMBUS_GSR_SB); 236 237 return amdpm_smbus_check_done(sc, op); 238 } 239 240 241 static int 242 amdpm_smbus_write_1(struct amdpm_softc *sc, uint8_t cmd, uint8_t val, 243 i2c_op_t op) 244 { 245 uint16_t data = 0; 246 int off = (sc->sc_nforce ? 0xe0 : 0); 247 248 /* first clear gsr */ 249 amdpm_smbus_clear_gsr(sc); 250 251 data = sc->sc_smbus_slaveaddr; 252 data <<= 1; 253 data |= AMDPM_8111_SMBUS_WRITE; 254 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 255 AMDPM_8111_SMBUS_HOSTADDR - off, data); 256 257 data = val; 258 /* store cmd */ 259 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 260 AMDPM_8111_SMBUS_HOSTCMD - off, cmd); 261 /* store data */ 262 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 263 AMDPM_8111_SMBUS_HOSTDATA - off, data); 264 /* host start */ 265 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 266 AMDPM_8111_SMBUS_CTRL - off, AMDPM_8111_SMBUS_GSR_WB); 267 268 return amdpm_smbus_check_done(sc, op); 269 } 270 271 static int 272 amdpm_smbus_receive_1(struct amdpm_softc *sc, i2c_op_t op) 273 { 274 uint16_t data = 0; 275 int off = (sc->sc_nforce ? 0xe0 : 0); 276 277 /* first clear gsr */ 278 amdpm_smbus_clear_gsr(sc); 279 280 /* write smbus slave address to register */ 281 data = sc->sc_smbus_slaveaddr; 282 data <<= 1; 283 data |= AMDPM_8111_SMBUS_RX; 284 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 285 AMDPM_8111_SMBUS_HOSTADDR - off, data); 286 287 /* start smbus cycle */ 288 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 289 AMDPM_8111_SMBUS_CTRL - off, AMDPM_8111_SMBUS_GSR_RXB); 290 291 /* check for errors */ 292 if (amdpm_smbus_check_done(sc, op) < 0) 293 return -1; 294 295 /* read data */ 296 data = bus_space_read_2(sc->sc_iot, sc->sc_ioh, 297 AMDPM_8111_SMBUS_HOSTDATA - off); 298 uint8_t ret = (uint8_t)(data & 0x00FF); 299 return ret; 300 } 301 302 static int 303 amdpm_smbus_read_1(struct amdpm_softc *sc, uint8_t cmd, i2c_op_t op) 304 { 305 uint16_t data = 0; 306 uint8_t ret; 307 int off = (sc->sc_nforce ? 0xe0 : 0); 308 309 /* first clear gsr */ 310 amdpm_smbus_clear_gsr(sc); 311 312 /* write smbus slave address to register */ 313 data = sc->sc_smbus_slaveaddr; 314 data <<= 1; 315 data |= AMDPM_8111_SMBUS_READ; 316 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 317 AMDPM_8111_SMBUS_HOSTADDR - off, data); 318 319 /* store cmd */ 320 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 321 AMDPM_8111_SMBUS_HOSTCMD - off, cmd); 322 /* host start */ 323 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 324 AMDPM_8111_SMBUS_CTRL - off, AMDPM_8111_SMBUS_GSR_RB); 325 326 /* check for errors */ 327 if (amdpm_smbus_check_done(sc, op) < 0) 328 return -1; 329 330 /* store data */ 331 data = bus_space_read_2(sc->sc_iot, sc->sc_ioh, 332 AMDPM_8111_SMBUS_HOSTDATA - off); 333 ret = (uint8_t)(data & 0x00FF); 334 return ret; 335 } 336