amdpm_smbus.c revision 1.13
1 /* $NetBSD: amdpm_smbus.c,v 1.13 2007/08/27 12:07:39 xtraeme Exp $ */ 2 3 /* 4 * Copyright (c) 2005 Anil Gopinath (anil_public (at) 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.13 2007/08/27 12:07:39 xtraeme 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 <dev/pci/pcireg.h> 43 #include <dev/pci/pcivar.h> 44 #include <dev/pci/pcidevs.h> 45 46 #include <dev/i2c/i2cvar.h> 47 #include <dev/i2c/i2c_bitbang.h> 48 49 #include <dev/pci/amdpmreg.h> 50 #include <dev/pci/amdpmvar.h> 51 52 #include <dev/pci/amdpm_smbusreg.h> 53 54 #ifdef __i386__ 55 #include "opt_xbox.h" 56 #endif 57 58 #ifdef XBOX 59 extern int arch_i386_is_xbox; 60 #endif 61 62 static int amdpm_smbus_acquire_bus(void *, int); 63 static void amdpm_smbus_release_bus(void *, int); 64 static int amdpm_smbus_exec(void *, i2c_op_t, i2c_addr_t, const void *, 65 size_t, void *, size_t, int); 66 static int amdpm_smbus_check_done(struct amdpm_softc *, i2c_op_t); 67 static void amdpm_smbus_clear_gsr(struct amdpm_softc *); 68 static uint16_t amdpm_smbus_get_gsr(struct amdpm_softc *); 69 static int amdpm_smbus_send_1(struct amdpm_softc *, uint8_t, i2c_op_t); 70 static int amdpm_smbus_write_1(struct amdpm_softc *, uint8_t, 71 uint8_t, i2c_op_t); 72 static int amdpm_smbus_receive_1(struct amdpm_softc *, i2c_op_t); 73 static int amdpm_smbus_read_1(struct amdpm_softc *sc, uint8_t, i2c_op_t); 74 75 #ifdef XBOX 76 static int amdpm_smbus_intr(void *); 77 #endif 78 79 void 80 amdpm_smbus_attach(struct amdpm_softc *sc) 81 { 82 struct i2cbus_attach_args iba; 83 #ifdef XBOX 84 pci_intr_handle_t ih; 85 const char *intrstr; 86 #endif 87 88 /* register with iic */ 89 sc->sc_i2c.ic_cookie = sc; 90 sc->sc_i2c.ic_acquire_bus = amdpm_smbus_acquire_bus; 91 sc->sc_i2c.ic_release_bus = amdpm_smbus_release_bus; 92 sc->sc_i2c.ic_send_start = NULL; 93 sc->sc_i2c.ic_send_stop = NULL; 94 sc->sc_i2c.ic_initiate_xfer = NULL; 95 sc->sc_i2c.ic_read_byte = NULL; 96 sc->sc_i2c.ic_write_byte = NULL; 97 sc->sc_i2c.ic_exec = amdpm_smbus_exec; 98 99 lockinit(&sc->sc_lock, PZERO, "amdpm_smbus", 0, 0); 100 101 #ifdef XBOX 102 #define XBOX_SMBA 0x8000 103 #define XBOX_SMSIZE 256 104 #define XBOX_INTRLINE 12 105 #define XBOX_REG_ACPI_PM1a_EN 0x02 106 #define XBOX_REG_ACPI_PM1a_EN_TIMER 0x01 107 /* XXX pci0 dev 1 function 2 "System Management" doesn't probe */ 108 if (arch_i386_is_xbox) { 109 uint16_t val; 110 sc->sc_pa->pa_intrline = XBOX_INTRLINE; 111 112 if (bus_space_map(sc->sc_iot, XBOX_SMBA, XBOX_SMSIZE, 113 0, &sc->sc_sm_ioh) == 0) { 114 aprint_normal("%s: system management at 0x%04x\n", 115 sc->sc_dev.dv_xname, XBOX_SMBA); 116 117 /* Disable PM ACPI timer SCI interrupt */ 118 val = bus_space_read_2(sc->sc_iot, sc->sc_sm_ioh, 119 XBOX_REG_ACPI_PM1a_EN); 120 bus_space_write_2(sc->sc_iot, sc->sc_sm_ioh, 121 XBOX_REG_ACPI_PM1a_EN, 122 val & ~XBOX_REG_ACPI_PM1a_EN_TIMER); 123 } 124 } 125 126 if (pci_intr_map(sc->sc_pa, &ih)) 127 aprint_error("%s: couldn't map interrupt\n", 128 sc->sc_dev.dv_xname); 129 else { 130 intrstr = pci_intr_string(sc->sc_pc, ih); 131 sc->sc_ih = pci_intr_establish(sc->sc_pc, ih, IPL_BIO, 132 amdpm_smbus_intr, sc); 133 if (sc->sc_ih != NULL) 134 aprint_normal("%s: interrupting at %s\n", 135 sc->sc_dev.dv_xname, intrstr); 136 } 137 #endif 138 139 iba.iba_tag = &sc->sc_i2c; 140 (void)config_found_ia(&sc->sc_dev, "i2cbus", &iba, iicbus_print); 141 } 142 143 #ifdef XBOX 144 static int 145 amdpm_smbus_intr(void *cookie) 146 { 147 struct amdpm_softc *sc; 148 uint32_t status; 149 150 sc = (struct amdpm_softc *)cookie; 151 152 if (arch_i386_is_xbox) { 153 status = bus_space_read_4(sc->sc_iot, sc->sc_sm_ioh, 0x20); 154 bus_space_write_4(sc->sc_iot, sc->sc_sm_ioh, 0x20, status); 155 156 if (status & 2) 157 return iic_smbus_intr(&sc->sc_i2c); 158 } 159 160 return 0; 161 } 162 #endif 163 164 static int 165 amdpm_smbus_acquire_bus(void *cookie, int flags) 166 { 167 struct amdpm_softc *sc = cookie; 168 int err; 169 170 err = lockmgr(&sc->sc_lock, LK_EXCLUSIVE, NULL); 171 return err; 172 } 173 174 static void 175 amdpm_smbus_release_bus(void *cookie, int flags) 176 { 177 struct amdpm_softc *sc = cookie; 178 179 lockmgr(&sc->sc_lock, LK_RELEASE, NULL); 180 } 181 182 static int 183 amdpm_smbus_exec(void *cookie, i2c_op_t op, i2c_addr_t addr, const void *cmd, 184 size_t cmdlen, void *vbuf, size_t buflen, int flags) 185 { 186 struct amdpm_softc *sc = (struct amdpm_softc *) cookie; 187 sc->sc_smbus_slaveaddr = addr; 188 uint8_t *p = vbuf; 189 int rv; 190 191 if (I2C_OP_READ_P(op) && (cmdlen == 0) && (buflen == 1)) { 192 rv = amdpm_smbus_receive_1(sc, op); 193 if (rv == -1) 194 return -1; 195 *p = (uint8_t)rv; 196 return 0; 197 } 198 199 if ((I2C_OP_READ_P(op)) && (cmdlen == 1) && (buflen == 1)) { 200 rv = amdpm_smbus_read_1(sc, *(const uint8_t *)cmd, op); 201 if (rv == -1) 202 return -1; 203 *p = (uint8_t)rv; 204 return 0; 205 } 206 207 if ((I2C_OP_WRITE_P(op)) && (cmdlen == 0) && (buflen == 1)) 208 return amdpm_smbus_send_1(sc, *(uint8_t*)vbuf, op); 209 210 if ((I2C_OP_WRITE_P(op)) && (cmdlen == 1) && (buflen == 1)) 211 return amdpm_smbus_write_1(sc, 212 *(const uint8_t*)cmd, 213 *(uint8_t*)vbuf, 214 op); 215 216 return -1; 217 } 218 219 static int 220 amdpm_smbus_check_done(struct amdpm_softc *sc, i2c_op_t op) 221 { 222 int i; 223 224 for (i = 0; i < 1000; i++) { 225 /* check gsr and wait till cycle is done */ 226 uint16_t data = amdpm_smbus_get_gsr(sc); 227 if (data & AMDPM_8111_GSR_CYCLE_DONE) 228 return 0; 229 } 230 231 if (!(op & I2C_F_POLL)) 232 delay(1); 233 234 return -1; 235 } 236 237 238 static void 239 amdpm_smbus_clear_gsr(struct amdpm_softc *sc) 240 { 241 /* clear register */ 242 uint16_t data = 0xFFFF; 243 int off = (sc->sc_nforce ? 0xe0 : 0); 244 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 245 AMDPM_8111_SMBUS_STAT - off, data); 246 } 247 248 static uint16_t 249 amdpm_smbus_get_gsr(struct amdpm_softc *sc) 250 { 251 int off = (sc->sc_nforce ? 0xe0 : 0); 252 return bus_space_read_2(sc->sc_iot, sc->sc_ioh, 253 AMDPM_8111_SMBUS_STAT - off); 254 } 255 256 static int 257 amdpm_smbus_send_1(struct amdpm_softc *sc, uint8_t val, i2c_op_t op) 258 { 259 uint16_t data = 0; 260 int off = (sc->sc_nforce ? 0xe0 : 0); 261 262 /* first clear gsr */ 263 amdpm_smbus_clear_gsr(sc); 264 265 /* write smbus slave address to register */ 266 data = sc->sc_smbus_slaveaddr; 267 data <<= 1; 268 data |= AMDPM_8111_SMBUS_SEND; 269 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 270 AMDPM_8111_SMBUS_HOSTADDR - off, data); 271 272 data = val; 273 /* store data */ 274 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 275 AMDPM_8111_SMBUS_HOSTDATA - off, data); 276 /* host start */ 277 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 278 AMDPM_8111_SMBUS_CTRL - off, 279 AMDPM_8111_SMBUS_GSR_SB); 280 281 return amdpm_smbus_check_done(sc, op); 282 } 283 284 285 static int 286 amdpm_smbus_write_1(struct amdpm_softc *sc, uint8_t cmd, uint8_t val, 287 i2c_op_t op) 288 { 289 uint16_t data = 0; 290 int off = (sc->sc_nforce ? 0xe0 : 0); 291 292 /* first clear gsr */ 293 amdpm_smbus_clear_gsr(sc); 294 295 data = sc->sc_smbus_slaveaddr; 296 data <<= 1; 297 data |= AMDPM_8111_SMBUS_WRITE; 298 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 299 AMDPM_8111_SMBUS_HOSTADDR - off, data); 300 301 data = val; 302 /* store cmd */ 303 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 304 AMDPM_8111_SMBUS_HOSTCMD - off, cmd); 305 /* store data */ 306 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 307 AMDPM_8111_SMBUS_HOSTDATA - off, data); 308 /* host start */ 309 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 310 AMDPM_8111_SMBUS_CTRL - off, AMDPM_8111_SMBUS_GSR_WB); 311 312 return amdpm_smbus_check_done(sc, op); 313 } 314 315 static int 316 amdpm_smbus_receive_1(struct amdpm_softc *sc, i2c_op_t op) 317 { 318 uint16_t data = 0; 319 int off = (sc->sc_nforce ? 0xe0 : 0); 320 321 /* first clear gsr */ 322 amdpm_smbus_clear_gsr(sc); 323 324 /* write smbus slave address to register */ 325 data = sc->sc_smbus_slaveaddr; 326 data <<= 1; 327 data |= AMDPM_8111_SMBUS_RX; 328 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 329 AMDPM_8111_SMBUS_HOSTADDR - off, data); 330 331 /* start smbus cycle */ 332 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 333 AMDPM_8111_SMBUS_CTRL - off, AMDPM_8111_SMBUS_GSR_RXB); 334 335 /* check for errors */ 336 if (amdpm_smbus_check_done(sc, op) < 0) 337 return -1; 338 339 /* read data */ 340 data = bus_space_read_2(sc->sc_iot, sc->sc_ioh, 341 AMDPM_8111_SMBUS_HOSTDATA - off); 342 uint8_t ret = (uint8_t)(data & 0x00FF); 343 return ret; 344 } 345 346 static int 347 amdpm_smbus_read_1(struct amdpm_softc *sc, uint8_t cmd, i2c_op_t op) 348 { 349 uint16_t data = 0; 350 uint8_t ret; 351 int off = (sc->sc_nforce ? 0xe0 : 0); 352 353 /* first clear gsr */ 354 amdpm_smbus_clear_gsr(sc); 355 356 /* write smbus slave address to register */ 357 data = sc->sc_smbus_slaveaddr; 358 data <<= 1; 359 data |= AMDPM_8111_SMBUS_READ; 360 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 361 AMDPM_8111_SMBUS_HOSTADDR - off, data); 362 363 /* store cmd */ 364 bus_space_write_1(sc->sc_iot, sc->sc_ioh, 365 AMDPM_8111_SMBUS_HOSTCMD - off, cmd); 366 /* host start */ 367 bus_space_write_2(sc->sc_iot, sc->sc_ioh, 368 AMDPM_8111_SMBUS_CTRL - off, AMDPM_8111_SMBUS_GSR_RB); 369 370 /* check for errors */ 371 if (amdpm_smbus_check_done(sc, op) < 0) 372 return -1; 373 374 /* store data */ 375 data = bus_space_read_2(sc->sc_iot, sc->sc_ioh, 376 AMDPM_8111_SMBUS_HOSTDATA - off); 377 ret = (uint8_t)(data & 0x00FF); 378 return ret; 379 } 380
Indexes created Wed Oct 01 13:09:50 GMT 2025