1/*- 2 * Copyright (c) 2005 Ruslan Ermilov 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27#include <sys/cdefs.h> 28__FBSDID("$FreeBSD$"); 29 30#include <sys/param.h> 31#include <sys/bus.h> 32#include <sys/kernel.h> 33#include <sys/lock.h> 34#include <sys/module.h> 35#include <sys/mutex.h> 36#include <sys/systm.h> 37 38#include <machine/bus.h> 39#include <machine/resource.h> 40#include <sys/rman.h> 41 42#include <dev/pci/pcivar.h> 43#include <dev/pci/pcireg.h> 44 45#include <dev/smbus/smbconf.h> 46#include "smbus_if.h" 47 48#define AMDSMB_DEBUG(x) if (amdsmb_debug) (x) 49 50#ifdef DEBUG 51static int amdsmb_debug = 1; 52#else 53static int amdsmb_debug = 0; 54#endif 55 56#define AMDSMB_VENDORID_AMD 0x1022 57#define AMDSMB_DEVICEID_AMD8111_SMB2 0x746a 58 59/* 60 * ACPI 3.0, Chapter 12, Embedded Controller Interface. 61 */ 62#define EC_DATA 0x00 /* data register */ 63#define EC_SC 0x04 /* status of controller */ 64#define EC_CMD 0x04 /* command register */ 65 66#define EC_SC_IBF 0x02 /* data ready for embedded controller */ 67#define EC_SC_OBF 0x01 /* data ready for host */ 68#define EC_CMD_WR 0x81 /* write EC */ 69#define EC_CMD_RD 0x80 /* read EC */ 70 71/* 72 * ACPI 3.0, Chapter 12, SMBus Host Controller Interface. 73 */ 74#define SMB_PRTCL 0x00 /* protocol */ 75#define SMB_STS 0x01 /* status */ 76#define SMB_ADDR 0x02 /* address */ 77#define SMB_CMD 0x03 /* command */ 78#define SMB_DATA 0x04 /* 32 data registers */ 79#define SMB_BCNT 0x24 /* number of data bytes */ 80#define SMB_ALRM_A 0x25 /* alarm address */ 81#define SMB_ALRM_D 0x26 /* 2 bytes alarm data */ 82 83#define SMB_STS_DONE 0x80 84#define SMB_STS_ALRM 0x40 85#define SMB_STS_RES 0x20 86#define SMB_STS_STATUS 0x1f 87#define SMB_STS_OK 0x00 /* OK */ 88#define SMB_STS_UF 0x07 /* Unknown Failure */ 89#define SMB_STS_DANA 0x10 /* Device Address Not Acknowledged */ 90#define SMB_STS_DED 0x11 /* Device Error Detected */ 91#define SMB_STS_DCAD 0x12 /* Device Command Access Denied */ 92#define SMB_STS_UE 0x13 /* Unknown Error */ 93#define SMB_STS_DAD 0x17 /* Device Access Denied */ 94#define SMB_STS_T 0x18 /* Timeout */ 95#define SMB_STS_HUP 0x19 /* Host Unsupported Protocol */ 96#define SMB_STS_B 0x1a /* Busy */ 97#define SMB_STS_PEC 0x1f /* PEC (CRC-8) Error */ 98 99#define SMB_PRTCL_WRITE 0x00 100#define SMB_PRTCL_READ 0x01 101#define SMB_PRTCL_QUICK 0x02 102#define SMB_PRTCL_BYTE 0x04 103#define SMB_PRTCL_BYTE_DATA 0x06 104#define SMB_PRTCL_WORD_DATA 0x08 105#define SMB_PRTCL_BLOCK_DATA 0x0a 106#define SMB_PRTCL_PROC_CALL 0x0c 107#define SMB_PRTCL_BLOCK_PROC_CALL 0x0d 108#define SMB_PRTCL_PEC 0x80 109 110struct amdsmb_softc { 111 int rid; 112 struct resource *res; 113 device_t smbus; 114 struct mtx lock; 115}; 116 117#define AMDSMB_LOCK(amdsmb) mtx_lock(&(amdsmb)->lock) 118#define AMDSMB_UNLOCK(amdsmb) mtx_unlock(&(amdsmb)->lock) 119#define AMDSMB_LOCK_ASSERT(amdsmb) mtx_assert(&(amdsmb)->lock, MA_OWNED) 120 121#define AMDSMB_ECINB(amdsmb, register) \ 122 (bus_read_1(amdsmb->res, register)) 123#define AMDSMB_ECOUTB(amdsmb, register, value) \ 124 (bus_write_1(amdsmb->res, register, value)) 125 126static int amdsmb_detach(device_t dev); 127 128struct pci_device_table amdsmb_devs[] = { 129 { PCI_DEV(AMDSMB_VENDORID_AMD, AMDSMB_DEVICEID_AMD8111_SMB2), 130 PCI_DESCR("AMD-8111 SMBus 2.0 Controller") } 131}; 132 133static int 134amdsmb_probe(device_t dev) 135{ 136 const struct pci_device_table *tbl; 137 138 tbl = PCI_MATCH(dev, amdsmb_devs); 139 if (tbl == NULL) 140 return (ENXIO); 141 device_set_desc(dev, tbl->descr); 142 143 return (BUS_PROBE_DEFAULT); 144} 145 146static int 147amdsmb_attach(device_t dev) 148{ 149 struct amdsmb_softc *amdsmb_sc = device_get_softc(dev); 150 151 /* Allocate I/O space */ 152 amdsmb_sc->rid = PCIR_BAR(0); 153 154 amdsmb_sc->res = bus_alloc_resource_any(dev, SYS_RES_IOPORT, 155 &amdsmb_sc->rid, RF_ACTIVE); 156 157 if (amdsmb_sc->res == NULL) { 158 device_printf(dev, "could not map i/o space\n"); 159 return (ENXIO); 160 } 161 162 mtx_init(&amdsmb_sc->lock, device_get_nameunit(dev), "amdsmb", MTX_DEF); 163 164 /* Allocate a new smbus device */ 165 amdsmb_sc->smbus = device_add_child(dev, "smbus", -1); 166 if (!amdsmb_sc->smbus) { 167 amdsmb_detach(dev); 168 return (EINVAL); 169 } 170 171 bus_generic_attach(dev); 172 173 return (0); 174} 175 176static int 177amdsmb_detach(device_t dev) 178{ 179 struct amdsmb_softc *amdsmb_sc = device_get_softc(dev); 180 181 if (amdsmb_sc->smbus) { 182 device_delete_child(dev, amdsmb_sc->smbus); 183 amdsmb_sc->smbus = NULL; 184 } 185 186 mtx_destroy(&amdsmb_sc->lock); 187 if (amdsmb_sc->res) 188 bus_release_resource(dev, SYS_RES_IOPORT, amdsmb_sc->rid, 189 amdsmb_sc->res); 190 191 return (0); 192} 193 194static int 195amdsmb_callback(device_t dev, int index, void *data) 196{ 197 int error = 0; 198 199 switch (index) { 200 case SMB_REQUEST_BUS: 201 case SMB_RELEASE_BUS: 202 break; 203 default: 204 error = EINVAL; 205 } 206 207 return (error); 208} 209 210static int 211amdsmb_ec_wait_write(struct amdsmb_softc *sc) 212{ 213 int timeout = 500; 214 215 while (timeout-- && AMDSMB_ECINB(sc, EC_SC) & EC_SC_IBF) 216 DELAY(1); 217 if (timeout == 0) { 218 device_printf(sc->smbus, "timeout waiting for IBF to clear\n"); 219 return (1); 220 } 221 return (0); 222} 223 224static int 225amdsmb_ec_wait_read(struct amdsmb_softc *sc) 226{ 227 int timeout = 500; 228 229 while (timeout-- && ~AMDSMB_ECINB(sc, EC_SC) & EC_SC_OBF) 230 DELAY(1); 231 if (timeout == 0) { 232 device_printf(sc->smbus, "timeout waiting for OBF to set\n"); 233 return (1); 234 } 235 return (0); 236} 237 238static int 239amdsmb_ec_read(struct amdsmb_softc *sc, u_char addr, u_char *data) 240{ 241 242 AMDSMB_LOCK_ASSERT(sc); 243 if (amdsmb_ec_wait_write(sc)) 244 return (1); 245 AMDSMB_ECOUTB(sc, EC_CMD, EC_CMD_RD); 246 247 if (amdsmb_ec_wait_write(sc)) 248 return (1); 249 AMDSMB_ECOUTB(sc, EC_DATA, addr); 250 251 if (amdsmb_ec_wait_read(sc)) 252 return (1); 253 *data = AMDSMB_ECINB(sc, EC_DATA); 254 255 return (0); 256} 257 258static int 259amdsmb_ec_write(struct amdsmb_softc *sc, u_char addr, u_char data) 260{ 261 262 AMDSMB_LOCK_ASSERT(sc); 263 if (amdsmb_ec_wait_write(sc)) 264 return (1); 265 AMDSMB_ECOUTB(sc, EC_CMD, EC_CMD_WR); 266 267 if (amdsmb_ec_wait_write(sc)) 268 return (1); 269 AMDSMB_ECOUTB(sc, EC_DATA, addr); 270 271 if (amdsmb_ec_wait_write(sc)) 272 return (1); 273 AMDSMB_ECOUTB(sc, EC_DATA, data); 274 275 return (0); 276} 277 278static int 279amdsmb_wait(struct amdsmb_softc *sc) 280{ 281 u_char sts, temp; 282 int error, count; 283 284 AMDSMB_LOCK_ASSERT(sc); 285 amdsmb_ec_read(sc, SMB_PRTCL, &temp); 286 if (temp != 0) 287 { 288 count = 10000; 289 do { 290 DELAY(500); 291 amdsmb_ec_read(sc, SMB_PRTCL, &temp); 292 } while (temp != 0 && count--); 293 if (count == 0) 294 return (SMB_ETIMEOUT); 295 } 296 297 amdsmb_ec_read(sc, SMB_STS, &sts); 298 sts &= SMB_STS_STATUS; 299 AMDSMB_DEBUG(printf("amdsmb: STS=0x%x\n", sts)); 300 301 switch (sts) { 302 case SMB_STS_OK: 303 error = SMB_ENOERR; 304 break; 305 case SMB_STS_DANA: 306 error = SMB_ENOACK; 307 break; 308 case SMB_STS_B: 309 error = SMB_EBUSY; 310 break; 311 case SMB_STS_T: 312 error = SMB_ETIMEOUT; 313 break; 314 case SMB_STS_DCAD: 315 case SMB_STS_DAD: 316 case SMB_STS_HUP: 317 error = SMB_ENOTSUPP; 318 break; 319 default: 320 error = SMB_EBUSERR; 321 break; 322 } 323 324 return (error); 325} 326 327static int 328amdsmb_quick(device_t dev, u_char slave, int how) 329{ 330 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 331 u_char protocol; 332 int error; 333 334 protocol = SMB_PRTCL_QUICK; 335 336 switch (how) { 337 case SMB_QWRITE: 338 protocol |= SMB_PRTCL_WRITE; 339 AMDSMB_DEBUG(printf("amdsmb: QWRITE to 0x%x", slave)); 340 break; 341 case SMB_QREAD: 342 protocol |= SMB_PRTCL_READ; 343 AMDSMB_DEBUG(printf("amdsmb: QREAD to 0x%x", slave)); 344 break; 345 default: 346 panic("%s: unknown QUICK command (%x)!", __func__, how); 347 } 348 349 AMDSMB_LOCK(sc); 350 amdsmb_ec_write(sc, SMB_ADDR, slave); 351 amdsmb_ec_write(sc, SMB_PRTCL, protocol); 352 353 error = amdsmb_wait(sc); 354 355 AMDSMB_DEBUG(printf(", error=0x%x\n", error)); 356 AMDSMB_UNLOCK(sc); 357 358 return (error); 359} 360 361static int 362amdsmb_sendb(device_t dev, u_char slave, char byte) 363{ 364 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 365 int error; 366 367 AMDSMB_LOCK(sc); 368 amdsmb_ec_write(sc, SMB_CMD, byte); 369 amdsmb_ec_write(sc, SMB_ADDR, slave); 370 amdsmb_ec_write(sc, SMB_PRTCL, SMB_PRTCL_WRITE | SMB_PRTCL_BYTE); 371 372 error = amdsmb_wait(sc); 373 374 AMDSMB_DEBUG(printf("amdsmb: SENDB to 0x%x, byte=0x%x, error=0x%x\n", 375 slave, byte, error)); 376 AMDSMB_UNLOCK(sc); 377 378 return (error); 379} 380 381static int 382amdsmb_recvb(device_t dev, u_char slave, char *byte) 383{ 384 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 385 int error; 386 387 AMDSMB_LOCK(sc); 388 amdsmb_ec_write(sc, SMB_ADDR, slave); 389 amdsmb_ec_write(sc, SMB_PRTCL, SMB_PRTCL_READ | SMB_PRTCL_BYTE); 390 391 if ((error = amdsmb_wait(sc)) == SMB_ENOERR) 392 amdsmb_ec_read(sc, SMB_DATA, byte); 393 394 AMDSMB_DEBUG(printf("amdsmb: RECVB from 0x%x, byte=0x%x, error=0x%x\n", 395 slave, *byte, error)); 396 AMDSMB_UNLOCK(sc); 397 398 return (error); 399} 400 401static int 402amdsmb_writeb(device_t dev, u_char slave, char cmd, char byte) 403{ 404 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 405 int error; 406 407 AMDSMB_LOCK(sc); 408 amdsmb_ec_write(sc, SMB_CMD, cmd); 409 amdsmb_ec_write(sc, SMB_DATA, byte); 410 amdsmb_ec_write(sc, SMB_ADDR, slave); 411 amdsmb_ec_write(sc, SMB_PRTCL, SMB_PRTCL_WRITE | SMB_PRTCL_BYTE_DATA); 412 413 error = amdsmb_wait(sc); 414 415 AMDSMB_DEBUG(printf("amdsmb: WRITEB to 0x%x, cmd=0x%x, byte=0x%x, " 416 "error=0x%x\n", slave, cmd, byte, error)); 417 AMDSMB_UNLOCK(sc); 418 419 return (error); 420} 421 422static int 423amdsmb_readb(device_t dev, u_char slave, char cmd, char *byte) 424{ 425 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 426 int error; 427 428 AMDSMB_LOCK(sc); 429 amdsmb_ec_write(sc, SMB_CMD, cmd); 430 amdsmb_ec_write(sc, SMB_ADDR, slave); 431 amdsmb_ec_write(sc, SMB_PRTCL, SMB_PRTCL_READ | SMB_PRTCL_BYTE_DATA); 432 433 if ((error = amdsmb_wait(sc)) == SMB_ENOERR) 434 amdsmb_ec_read(sc, SMB_DATA, byte); 435 436 AMDSMB_DEBUG(printf("amdsmb: READB from 0x%x, cmd=0x%x, byte=0x%x, " 437 "error=0x%x\n", slave, cmd, (unsigned char)*byte, error)); 438 AMDSMB_UNLOCK(sc); 439 440 return (error); 441} 442 443static int 444amdsmb_writew(device_t dev, u_char slave, char cmd, short word) 445{ 446 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 447 int error; 448 449 AMDSMB_LOCK(sc); 450 amdsmb_ec_write(sc, SMB_CMD, cmd); 451 amdsmb_ec_write(sc, SMB_DATA, word); 452 amdsmb_ec_write(sc, SMB_DATA + 1, word >> 8); 453 amdsmb_ec_write(sc, SMB_ADDR, slave); 454 amdsmb_ec_write(sc, SMB_PRTCL, SMB_PRTCL_WRITE | SMB_PRTCL_WORD_DATA); 455 456 error = amdsmb_wait(sc); 457 458 AMDSMB_DEBUG(printf("amdsmb: WRITEW to 0x%x, cmd=0x%x, word=0x%x, " 459 "error=0x%x\n", slave, cmd, word, error)); 460 AMDSMB_UNLOCK(sc); 461 462 return (error); 463} 464 465static int 466amdsmb_readw(device_t dev, u_char slave, char cmd, short *word) 467{ 468 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 469 u_char temp[2]; 470 int error; 471 472 AMDSMB_LOCK(sc); 473 amdsmb_ec_write(sc, SMB_CMD, cmd); 474 amdsmb_ec_write(sc, SMB_ADDR, slave); 475 amdsmb_ec_write(sc, SMB_PRTCL, SMB_PRTCL_READ | SMB_PRTCL_WORD_DATA); 476 477 if ((error = amdsmb_wait(sc)) == SMB_ENOERR) { 478 amdsmb_ec_read(sc, SMB_DATA + 0, &temp[0]); 479 amdsmb_ec_read(sc, SMB_DATA + 1, &temp[1]); 480 *word = temp[0] | (temp[1] << 8); 481 } 482 483 AMDSMB_DEBUG(printf("amdsmb: READW from 0x%x, cmd=0x%x, word=0x%x, " 484 "error=0x%x\n", slave, cmd, (unsigned short)*word, error)); 485 AMDSMB_UNLOCK(sc); 486 487 return (error); 488} 489 490static int 491amdsmb_bwrite(device_t dev, u_char slave, char cmd, u_char count, char *buf) 492{ 493 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 494 u_char i; 495 int error; 496 497 if (count < 1 || count > 32) 498 return (SMB_EINVAL); 499 500 AMDSMB_LOCK(sc); 501 amdsmb_ec_write(sc, SMB_CMD, cmd); 502 amdsmb_ec_write(sc, SMB_BCNT, count); 503 for (i = 0; i < count; i++) 504 amdsmb_ec_write(sc, SMB_DATA + i, buf[i]); 505 amdsmb_ec_write(sc, SMB_ADDR, slave); 506 amdsmb_ec_write(sc, SMB_PRTCL, SMB_PRTCL_WRITE | SMB_PRTCL_BLOCK_DATA); 507 508 error = amdsmb_wait(sc); 509 510 AMDSMB_DEBUG(printf("amdsmb: WRITEBLK to 0x%x, count=0x%x, cmd=0x%x, " 511 "error=0x%x", slave, count, cmd, error)); 512 AMDSMB_UNLOCK(sc); 513 514 return (error); 515} 516 517static int 518amdsmb_bread(device_t dev, u_char slave, char cmd, u_char *count, char *buf) 519{ 520 struct amdsmb_softc *sc = (struct amdsmb_softc *)device_get_softc(dev); 521 u_char data, len, i; 522 int error; 523 524 if (*count < 1 || *count > 32) 525 return (SMB_EINVAL); 526 527 AMDSMB_LOCK(sc); 528 amdsmb_ec_write(sc, SMB_CMD, cmd); 529 amdsmb_ec_write(sc, SMB_ADDR, slave); 530 amdsmb_ec_write(sc, SMB_PRTCL, SMB_PRTCL_READ | SMB_PRTCL_BLOCK_DATA); 531 532 if ((error = amdsmb_wait(sc)) == SMB_ENOERR) { 533 amdsmb_ec_read(sc, SMB_BCNT, &len); 534 for (i = 0; i < len; i++) { 535 amdsmb_ec_read(sc, SMB_DATA + i, &data); 536 if (i < *count) 537 buf[i] = data; 538 } 539 *count = len; 540 } 541 542 AMDSMB_DEBUG(printf("amdsmb: READBLK to 0x%x, count=0x%x, cmd=0x%x, " 543 "error=0x%x", slave, *count, cmd, error)); 544 AMDSMB_UNLOCK(sc); 545 546 return (error); 547} 548 549static device_method_t amdsmb_methods[] = { 550 /* Device interface */ 551 DEVMETHOD(device_probe, amdsmb_probe), 552 DEVMETHOD(device_attach, amdsmb_attach), 553 DEVMETHOD(device_detach, amdsmb_detach), 554 555 /* SMBus interface */ 556 DEVMETHOD(smbus_callback, amdsmb_callback), 557 DEVMETHOD(smbus_quick, amdsmb_quick), 558 DEVMETHOD(smbus_sendb, amdsmb_sendb), 559 DEVMETHOD(smbus_recvb, amdsmb_recvb), 560 DEVMETHOD(smbus_writeb, amdsmb_writeb), 561 DEVMETHOD(smbus_readb, amdsmb_readb), 562 DEVMETHOD(smbus_writew, amdsmb_writew), 563 DEVMETHOD(smbus_readw, amdsmb_readw), 564 DEVMETHOD(smbus_bwrite, amdsmb_bwrite), 565 DEVMETHOD(smbus_bread, amdsmb_bread), 566 { 0, 0 } 567}; 568 569static devclass_t amdsmb_devclass; 570 571static driver_t amdsmb_driver = { 572 "amdsmb", 573 amdsmb_methods, 574 sizeof(struct amdsmb_softc), 575}; 576 577DRIVER_MODULE(amdsmb, pci, amdsmb_driver, amdsmb_devclass, 0, 0); 578DRIVER_MODULE(smbus, amdsmb, smbus_driver, smbus_devclass, 0, 0); 579 580MODULE_DEPEND(amdsmb, pci, 1, 1, 1); 581MODULE_DEPEND(amdsmb, smbus, SMBUS_MINVER, SMBUS_PREFVER, SMBUS_MAXVER); 582MODULE_VERSION(amdsmb, 1); 583