drivers/i2c/busses/i2c-amd756.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3     Copyright (c) 1999-2002 Merlin Hughes <merlin@merlin.org>
   4
   5     Shamelessly ripped from i2c-piix4.c:
   6
   7     Copyright (c) 1998, 1999  Frodo Looijaard <frodol@dds.nl> and
   8     Philip Edelbrock <phil@netroedge.com>
   9
  10 */
  11
  12 /*
  13     2002-04-08: Added nForce support. (Csaba Halasz)
  14     2002-10-03: Fixed nForce PnP I/O port. (Michael Steil)
  15     2002-12-28: Rewritten into something that resembles a Linux driver (hch)
  16     2003-11-29: Added back AMD8111 removed by the previous rewrite.
  17                 (Philip Pokorny)
  18 */
  19
  20 /*
  21    Supports AMD756, AMD766, AMD768, AMD8111 and nVidia nForce
  22    Note: we assume there can only be one device, with one SMBus interface.
  23 */
  24
  25 #include <linux/module.h>
  26 #include <linux/pci.h>
  27 #include <linux/kernel.h>
  28 #include <linux/delay.h>
  29 #include <linux/stddef.h>
  30 #include <linux/ioport.h>
  31 #include <linux/i2c.h>
  32 #include <linux/acpi.h>
  33 #include <linux/io.h>
  34
  35 /* AMD756 SMBus address offsets */
  36 #define SMB_ADDR_OFFSET         0xE0
  37 #define SMB_IOSIZE              16
  38 #define SMB_GLOBAL_STATUS       (0x0 + amd756_ioport)
  39 #define SMB_GLOBAL_ENABLE       (0x2 + amd756_ioport)
  40 #define SMB_HOST_ADDRESS        (0x4 + amd756_ioport)
  41 #define SMB_HOST_DATA           (0x6 + amd756_ioport)
  42 #define SMB_HOST_COMMAND        (0x8 + amd756_ioport)
  43 #define SMB_HOST_BLOCK_DATA     (0x9 + amd756_ioport)
  44 #define SMB_HAS_DATA            (0xA + amd756_ioport)
  45 #define SMB_HAS_DEVICE_ADDRESS  (0xC + amd756_ioport)
  46 #define SMB_HAS_HOST_ADDRESS    (0xE + amd756_ioport)
  47 #define SMB_SNOOP_ADDRESS       (0xF + amd756_ioport)
  48
  49 /* PCI Address Constants */
  50
  51 /* address of I/O space */
  52 #define SMBBA           0x058           /* mh */
  53 #define SMBBANFORCE     0x014
  54
  55 /* general configuration */
  56 #define SMBGCFG         0x041           /* mh */
  57
  58 /* silicon revision code */
  59 #define SMBREV          0x008
  60
  61 /* Other settings */
  62 #define MAX_TIMEOUT     500
  63
  64 /* AMD756 constants */
  65 #define AMD756_QUICK            0x00
  66 #define AMD756_BYTE             0x01
  67 #define AMD756_BYTE_DATA        0x02
  68 #define AMD756_WORD_DATA        0x03
  69 #define AMD756_PROCESS_CALL     0x04
  70 #define AMD756_BLOCK_DATA       0x05
  71
  72 static struct pci_driver amd756_driver;
  73 static unsigned short amd756_ioport;
  74
  75 /*
  76   SMBUS event = I/O 28-29 bit 11
  77      see E0 for the status bits and enabled in E2
  78
  79 */
  80 #define GS_ABRT_STS     (1 << 0)
  81 #define GS_COL_STS      (1 << 1)
  82 #define GS_PRERR_STS    (1 << 2)
  83 #define GS_HST_STS      (1 << 3)
  84 #define GS_HCYC_STS     (1 << 4)
  85 #define GS_TO_STS       (1 << 5)
  86 #define GS_SMB_STS      (1 << 11)
  87
  88 #define GS_CLEAR_STS    (GS_ABRT_STS | GS_COL_STS | GS_PRERR_STS | \
  89                          GS_HCYC_STS | GS_TO_STS )
  90
  91 #define GE_CYC_TYPE_MASK        (7)
  92 #define GE_HOST_STC             (1 << 3)
  93 #define GE_ABORT                (1 << 5)
  94
  95
  96 static int amd756_transaction(struct i2c_adapter *adap)
  97 {
  98         int temp;
  99         int result = 0;
 100         int timeout = 0;
 101
 102         dev_dbg(&adap->dev, "Transaction (pre): GS=%04x, GE=%04x, ADD=%04x, "
 103                 "DAT=%04x\n", inw_p(SMB_GLOBAL_STATUS),
 104                 inw_p(SMB_GLOBAL_ENABLE), inw_p(SMB_HOST_ADDRESS),
 105                 inb_p(SMB_HOST_DATA));
 106
 107         /* Make sure the SMBus host is ready to start transmitting */
 108         if ((temp = inw_p(SMB_GLOBAL_STATUS)) & (GS_HST_STS | GS_SMB_STS)) {
 109                 dev_dbg(&adap->dev, "SMBus busy (%04x). Waiting...\n", temp);
 110                 do {
 111                         msleep(1);
 112                         temp = inw_p(SMB_GLOBAL_STATUS);
 113                 } while ((temp & (GS_HST_STS | GS_SMB_STS)) &&
 114                          (timeout++ < MAX_TIMEOUT));
 115                 /* If the SMBus is still busy, we give up */
 116                 if (timeout > MAX_TIMEOUT) {
 117                         dev_dbg(&adap->dev, "Busy wait timeout (%04x)\n", temp);
 118                         goto abort;
 119                 }
 120                 timeout = 0;
 121         }
 122
 123         /* start the transaction by setting the start bit */
 124         outw_p(inw(SMB_GLOBAL_ENABLE) | GE_HOST_STC, SMB_GLOBAL_ENABLE);
 125
 126         /* We will always wait for a fraction of a second! */
 127         do {
 128                 msleep(1);
 129                 temp = inw_p(SMB_GLOBAL_STATUS);
 130         } while ((temp & GS_HST_STS) && (timeout++ < MAX_TIMEOUT));
 131
 132         /* If the SMBus is still busy, we give up */
 133         if (timeout > MAX_TIMEOUT) {
 134                 dev_dbg(&adap->dev, "Completion timeout!\n");
 135                 goto abort;
 136         }
 137
 138         if (temp & GS_PRERR_STS) {
 139                 result = -ENXIO;
 140                 dev_dbg(&adap->dev, "SMBus Protocol error (no response)!\n");
 141         }
 142
 143         if (temp & GS_COL_STS) {
 144                 result = -EIO;
 145                 dev_warn(&adap->dev, "SMBus collision!\n");
 146         }
 147
 148         if (temp & GS_TO_STS) {
 149                 result = -ETIMEDOUT;
 150                 dev_dbg(&adap->dev, "SMBus protocol timeout!\n");
 151         }
 152
 153         if (temp & GS_HCYC_STS)
 154                 dev_dbg(&adap->dev, "SMBus protocol success!\n");
 155
 156         outw_p(GS_CLEAR_STS, SMB_GLOBAL_STATUS);
 157
 158 #ifdef DEBUG
 159         if (((temp = inw_p(SMB_GLOBAL_STATUS)) & GS_CLEAR_STS) != 0x00) {
 160                 dev_dbg(&adap->dev,
 161                         "Failed reset at end of transaction (%04x)\n", temp);
 162         }
 163 #endif
 164
 165         dev_dbg(&adap->dev,
 166                 "Transaction (post): GS=%04x, GE=%04x, ADD=%04x, DAT=%04x\n",
 167                 inw_p(SMB_GLOBAL_STATUS), inw_p(SMB_GLOBAL_ENABLE),
 168                 inw_p(SMB_HOST_ADDRESS), inb_p(SMB_HOST_DATA));
 169
 170         return result;
 171
 172  abort:
 173         dev_warn(&adap->dev, "Sending abort\n");
 174         outw_p(inw(SMB_GLOBAL_ENABLE) | GE_ABORT, SMB_GLOBAL_ENABLE);
 175         msleep(100);
 176         outw_p(GS_CLEAR_STS, SMB_GLOBAL_STATUS);
 177         return -EIO;
 178 }
 179
 180 /* Return negative errno on error. */
 181 static s32 amd756_access(struct i2c_adapter * adap, u16 addr,
 182                   unsigned short flags, char read_write,
 183                   u8 command, int size, union i2c_smbus_data * data)
 184 {
 185         int i, len;
 186         int status;
 187
 188         switch (size) {
 189         case I2C_SMBUS_QUICK:
 190                 outw_p(((addr & 0x7f) << 1) | (read_write & 0x01),
 191                        SMB_HOST_ADDRESS);
 192                 size = AMD756_QUICK;
 193                 break;
 194         case I2C_SMBUS_BYTE:
 195                 outw_p(((addr & 0x7f) << 1) | (read_write & 0x01),
 196                        SMB_HOST_ADDRESS);
 197                 if (read_write == I2C_SMBUS_WRITE)
 198                         outb_p(command, SMB_HOST_DATA);
 199                 size = AMD756_BYTE;
 200                 break;
 201         case I2C_SMBUS_BYTE_DATA:
 202                 outw_p(((addr & 0x7f) << 1) | (read_write & 0x01),
 203                        SMB_HOST_ADDRESS);
 204                 outb_p(command, SMB_HOST_COMMAND);
 205                 if (read_write == I2C_SMBUS_WRITE)
 206                         outw_p(data->byte, SMB_HOST_DATA);
 207                 size = AMD756_BYTE_DATA;
 208                 break;
 209         case I2C_SMBUS_WORD_DATA:
 210                 outw_p(((addr & 0x7f) << 1) | (read_write & 0x01),
 211                        SMB_HOST_ADDRESS);
 212                 outb_p(command, SMB_HOST_COMMAND);
 213                 if (read_write == I2C_SMBUS_WRITE)
 214                         outw_p(data->word, SMB_HOST_DATA);      /* TODO: endian???? */
 215                 size = AMD756_WORD_DATA;
 216                 break;
 217         case I2C_SMBUS_BLOCK_DATA:
 218                 outw_p(((addr & 0x7f) << 1) | (read_write & 0x01),
 219                        SMB_HOST_ADDRESS);
 220                 outb_p(command, SMB_HOST_COMMAND);
 221                 if (read_write == I2C_SMBUS_WRITE) {
 222                         len = data->block[0];
 223                         if (len < 0)
 224                                 len = 0;
 225                         if (len > 32)
 226                                 len = 32;
 227                         outw_p(len, SMB_HOST_DATA);
 228                         /* i = inw_p(SMBHSTCNT); Reset SMBBLKDAT */
 229                         for (i = 1; i <= len; i++)
 230                                 outb_p(data->block[i],
 231                                        SMB_HOST_BLOCK_DATA);
 232                 }
 233                 size = AMD756_BLOCK_DATA;
 234                 break;
 235         default:
 236                 dev_warn(&adap->dev, "Unsupported transaction %d\n", size);
 237                 return -EOPNOTSUPP;
 238         }
 239
 240         /* How about enabling interrupts... */
 241         outw_p(size & GE_CYC_TYPE_MASK, SMB_GLOBAL_ENABLE);
 242
 243         status = amd756_transaction(adap);
 244         if (status)
 245                 return status;
 246
 247         if ((read_write == I2C_SMBUS_WRITE) || (size == AMD756_QUICK))
 248                 return 0;
 249
 250
 251         switch (size) {
 252         case AMD756_BYTE:
 253                 data->byte = inw_p(SMB_HOST_DATA);
 254                 break;
 255         case AMD756_BYTE_DATA:
 256                 data->byte = inw_p(SMB_HOST_DATA);
 257                 break;
 258         case AMD756_WORD_DATA:
 259                 data->word = inw_p(SMB_HOST_DATA);      /* TODO: endian???? */
 260                 break;
 261         case AMD756_BLOCK_DATA:
 262                 data->block[0] = inw_p(SMB_HOST_DATA) & 0x3f;
 263                 if(data->block[0] > 32)
 264                         data->block[0] = 32;
 265                 /* i = inw_p(SMBHSTCNT); Reset SMBBLKDAT */
 266                 for (i = 1; i <= data->block[0]; i++)
 267                         data->block[i] = inb_p(SMB_HOST_BLOCK_DATA);
 268                 break;
 269         }
 270
 271         return 0;
 272 }
 273
 274 static u32 amd756_func(struct i2c_adapter *adapter)
 275 {
 276         return I2C_FUNC_SMBUS_QUICK | I2C_FUNC_SMBUS_BYTE |
 277             I2C_FUNC_SMBUS_BYTE_DATA | I2C_FUNC_SMBUS_WORD_DATA |
 278             I2C_FUNC_SMBUS_BLOCK_DATA;
 279 }
 280
 281 static const struct i2c_algorithm smbus_algorithm = {
 282         .smbus_xfer     = amd756_access,
 283         .functionality  = amd756_func,
 284 };
 285
 286 struct i2c_adapter amd756_smbus = {
 287         .owner          = THIS_MODULE,
 288         .class          = I2C_CLASS_HWMON | I2C_CLASS_SPD,
 289         .algo           = &smbus_algorithm,
 290 };
 291
 292 enum chiptype { AMD756, AMD766, AMD768, NFORCE, AMD8111 };
 293 static const char* chipname[] = {
 294         "AMD756", "AMD766", "AMD768",
 295         "nVidia nForce", "AMD8111",
 296 };
 297
 298 static const struct pci_device_id amd756_ids[] = {
 299         { PCI_DEVICE(PCI_VENDOR_ID_AMD, PCI_DEVICE_ID_AMD_VIPER_740B),
 300           .driver_data = AMD756 },
 301         { PCI_DEVICE(PCI_VENDOR_ID_AMD, PCI_DEVICE_ID_AMD_VIPER_7413),
 302           .driver_data = AMD766 },
 303         { PCI_DEVICE(PCI_VENDOR_ID_AMD, PCI_DEVICE_ID_AMD_OPUS_7443),
 304           .driver_data = AMD768 },
 305         { PCI_DEVICE(PCI_VENDOR_ID_AMD, PCI_DEVICE_ID_AMD_8111_SMBUS),
 306           .driver_data = AMD8111 },
 307         { PCI_DEVICE(PCI_VENDOR_ID_NVIDIA, PCI_DEVICE_ID_NVIDIA_NFORCE_SMBUS),
 308           .driver_data = NFORCE },
 309         { 0, }
 310 };
 311
 312 MODULE_DEVICE_TABLE (pci, amd756_ids);
 313
 314 static int amd756_probe(struct pci_dev *pdev, const struct pci_device_id *id)
 315 {
 316         int nforce = (id->driver_data == NFORCE);
 317         int error;
 318         u8 temp;
 319
 320         if (amd756_ioport) {
 321                 dev_err(&pdev->dev, "Only one device supported "
 322                        "(you have a strange motherboard, btw)\n");
 323                 return -ENODEV;
 324         }
 325
 326         if (nforce) {
 327                 if (PCI_FUNC(pdev->devfn) != 1)
 328                         return -ENODEV;
 329
 330                 pci_read_config_word(pdev, SMBBANFORCE, &amd756_ioport);
 331                 amd756_ioport &= 0xfffc;
 332         } else { /* amd */
 333                 if (PCI_FUNC(pdev->devfn) != 3)
 334                         return -ENODEV;
 335
 336                 pci_read_config_byte(pdev, SMBGCFG, &temp);
 337                 if ((temp & 128) == 0) {
 338                         dev_err(&pdev->dev,
 339                                 "Error: SMBus controller I/O not enabled!\n");
 340                         return -ENODEV;
 341                 }
 342
 343                 /* Determine the address of the SMBus areas */
 344                 /* Technically it is a dword but... */
 345                 pci_read_config_word(pdev, SMBBA, &amd756_ioport);
 346                 amd756_ioport &= 0xff00;
 347                 amd756_ioport += SMB_ADDR_OFFSET;
 348         }
 349
 350         error = acpi_check_region(amd756_ioport, SMB_IOSIZE,
 351                                   amd756_driver.name);
 352         if (error)
 353                 return -ENODEV;
 354
 355         if (!request_region(amd756_ioport, SMB_IOSIZE, amd756_driver.name)) {
 356                 dev_err(&pdev->dev, "SMB region 0x%x already in use!\n",
 357                         amd756_ioport);
 358                 return -ENODEV;
 359         }
 360
 361         pci_read_config_byte(pdev, SMBREV, &temp);
 362         dev_dbg(&pdev->dev, "SMBREV = 0x%X\n", temp);
 363         dev_dbg(&pdev->dev, "AMD756_smba = 0x%X\n", amd756_ioport);
 364
 365         /* set up the sysfs linkage to our parent device */
 366         amd756_smbus.dev.parent = &pdev->dev;
 367
 368         snprintf(amd756_smbus.name, sizeof(amd756_smbus.name),
 369                  "SMBus %s adapter at %04x", chipname[id->driver_data],
 370                  amd756_ioport);
 371
 372         error = i2c_add_adapter(&amd756_smbus);
 373         if (error)
 374                 goto out_err;
 375
 376         return 0;
 377
 378  out_err:
 379         release_region(amd756_ioport, SMB_IOSIZE);
 380         return error;
 381 }
 382
 383 static void amd756_remove(struct pci_dev *dev)
 384 {
 385         i2c_del_adapter(&amd756_smbus);
 386         release_region(amd756_ioport, SMB_IOSIZE);
 387 }
 388
 389 static struct pci_driver amd756_driver = {
 390         .name           = "amd756_smbus",
 391         .id_table       = amd756_ids,
 392         .probe          = amd756_probe,
 393         .remove         = amd756_remove,
 394 };
 395
 396 module_pci_driver(amd756_driver);
 397
 398 MODULE_AUTHOR("Merlin Hughes <merlin@merlin.org>");
 399 MODULE_DESCRIPTION("AMD756/766/768/8111 and nVidia nForce SMBus driver");
 400 MODULE_LICENSE("GPL");
 401
 402 EXPORT_SYMBOL(amd756_smbus);