drivers/i2c/busses/i2c-ali1563.c

   1 /**
   2  *      i2c-ali1563.c - i2c driver for the ALi 1563 Southbridge
   3  *
   4  *      Copyright (C) 2004 Patrick Mochel
   5  *                    2005 Rudolf Marek <r.marek@sh.cvut.cz>
   6  *
   7  *      The 1563 southbridge is deceptively similar to the 1533, with a
   8  *      few notable exceptions. One of those happens to be the fact they
   9  *      upgraded the i2c core to be 2.0 compliant, and happens to be almost
  10  *      identical to the i2c controller found in the Intel 801 south
  11  *      bridges.
  12  *
  13  *      This driver is based on a mix of the 15x3, 1535, and i801 drivers,
  14  *      with a little help from the ALi 1563 spec.
  15  *
  16  *      This file is released under the GPLv2
  17  */
  18
  19 #include <linux/module.h>
  20 #include <linux/delay.h>
  21 #include <linux/i2c.h>
  22 #include <linux/pci.h>
  23 #include <linux/init.h>
  24
  25 #define ALI1563_MAX_TIMEOUT     500
  26 #define ALI1563_SMBBA           0x80
  27 #define ALI1563_SMB_IOEN        1
  28 #define ALI1563_SMB_HOSTEN      2
  29 #define ALI1563_SMB_IOSIZE      16
  30
  31 #define SMB_HST_STS     (ali1563_smba + 0)
  32 #define SMB_HST_CNTL1   (ali1563_smba + 1)
  33 #define SMB_HST_CNTL2   (ali1563_smba + 2)
  34 #define SMB_HST_CMD     (ali1563_smba + 3)
  35 #define SMB_HST_ADD     (ali1563_smba + 4)
  36 #define SMB_HST_DAT0    (ali1563_smba + 5)
  37 #define SMB_HST_DAT1    (ali1563_smba + 6)
  38 #define SMB_BLK_DAT     (ali1563_smba + 7)
  39
  40 #define HST_STS_BUSY    0x01
  41 #define HST_STS_INTR    0x02
  42 #define HST_STS_DEVERR  0x04
  43 #define HST_STS_BUSERR  0x08
  44 #define HST_STS_FAIL    0x10
  45 #define HST_STS_DONE    0x80
  46 #define HST_STS_BAD     0x1c
  47
  48
  49 #define HST_CNTL1_TIMEOUT       0x80
  50 #define HST_CNTL1_LAST          0x40
  51
  52 #define HST_CNTL2_KILL          0x04
  53 #define HST_CNTL2_START         0x40
  54 #define HST_CNTL2_QUICK         0x00
  55 #define HST_CNTL2_BYTE          0x01
  56 #define HST_CNTL2_BYTE_DATA     0x02
  57 #define HST_CNTL2_WORD_DATA     0x03
  58 #define HST_CNTL2_BLOCK         0x05
  59
  60
  61 #define HST_CNTL2_SIZEMASK      0x38
  62
  63 static struct pci_driver ali1563_pci_driver;
  64 static unsigned short ali1563_smba;
  65
  66 static int ali1563_transaction(struct i2c_adapter * a, int size)
  67 {
  68         u32 data;
  69         int timeout;
  70
  71         dev_dbg(&a->dev, "Transaction (pre): STS=%02x, CNTL1=%02x, "
  72                 "CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
  73                 inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
  74                 inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
  75                 inb_p(SMB_HST_DAT1));
  76
  77         data = inb_p(SMB_HST_STS);
  78         if (data & HST_STS_BAD) {
  79                 dev_err(&a->dev, "ali1563: Trying to reset busy device\n");
  80                 outb_p(data | HST_STS_BAD,SMB_HST_STS);
  81                 data = inb_p(SMB_HST_STS);
  82                 if (data & HST_STS_BAD)
  83                         return -EBUSY;
  84         }
  85         outb_p(inb_p(SMB_HST_CNTL2) | HST_CNTL2_START, SMB_HST_CNTL2);
  86
  87         timeout = ALI1563_MAX_TIMEOUT;
  88         do
  89                 msleep(1);
  90         while (((data = inb_p(SMB_HST_STS)) & HST_STS_BUSY) && --timeout);
  91
  92         dev_dbg(&a->dev, "Transaction (post): STS=%02x, CNTL1=%02x, "
  93                 "CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
  94                 inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
  95                 inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
  96                 inb_p(SMB_HST_DAT1));
  97
  98         if (timeout && !(data & HST_STS_BAD))
  99                 return 0;
 100
 101         if (!timeout) {
 102                 dev_err(&a->dev, "Timeout - Trying to KILL transaction!\n");
 103                 /* Issue 'kill' to host controller */
 104                 outb_p(HST_CNTL2_KILL,SMB_HST_CNTL2);
 105                 data = inb_p(SMB_HST_STS);
 106         }
 107
 108         /* device error - no response, ignore the autodetection case */
 109         if ((data & HST_STS_DEVERR) && (size != HST_CNTL2_QUICK)) {
 110                 dev_err(&a->dev, "Device error!\n");
 111         }
 112
 113         /* bus collision */
 114         if (data & HST_STS_BUSERR) {
 115                 dev_err(&a->dev, "Bus collision!\n");
 116                 /* Issue timeout, hoping it helps */
 117                 outb_p(HST_CNTL1_TIMEOUT,SMB_HST_CNTL1);
 118         }
 119
 120         if (data & HST_STS_FAIL) {
 121                 dev_err(&a->dev, "Cleaning fail after KILL!\n");
 122                 outb_p(0x0,SMB_HST_CNTL2);
 123         }
 124
 125         return -1;
 126 }
 127
 128 static int ali1563_block_start(struct i2c_adapter * a)
 129 {
 130         u32 data;
 131         int timeout;
 132
 133         dev_dbg(&a->dev, "Block (pre): STS=%02x, CNTL1=%02x, "
 134                 "CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
 135                 inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
 136                 inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
 137                 inb_p(SMB_HST_DAT1));
 138
 139         data = inb_p(SMB_HST_STS);
 140         if (data & HST_STS_BAD) {
 141                 dev_warn(&a->dev,"ali1563: Trying to reset busy device\n");
 142                 outb_p(data | HST_STS_BAD,SMB_HST_STS);
 143                 data = inb_p(SMB_HST_STS);
 144                 if (data & HST_STS_BAD)
 145                         return -EBUSY;
 146         }
 147
 148         /* Clear byte-ready bit */
 149         outb_p(data | HST_STS_DONE, SMB_HST_STS);
 150
 151         /* Start transaction and wait for byte-ready bit to be set */
 152         outb_p(inb_p(SMB_HST_CNTL2) | HST_CNTL2_START, SMB_HST_CNTL2);
 153
 154         timeout = ALI1563_MAX_TIMEOUT;
 155         do
 156                 msleep(1);
 157         while (!((data = inb_p(SMB_HST_STS)) & HST_STS_DONE) && --timeout);
 158
 159         dev_dbg(&a->dev, "Block (post): STS=%02x, CNTL1=%02x, "
 160                 "CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
 161                 inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
 162                 inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
 163                 inb_p(SMB_HST_DAT1));
 164
 165         if (timeout && !(data & HST_STS_BAD))
 166                 return 0;
 167         dev_err(&a->dev, "SMBus Error: %s%s%s%s%s\n",
 168                 timeout ? "Timeout " : "",
 169                 data & HST_STS_FAIL ? "Transaction Failed " : "",
 170                 data & HST_STS_BUSERR ? "No response or Bus Collision " : "",
 171                 data & HST_STS_DEVERR ? "Device Error " : "",
 172                 !(data & HST_STS_DONE) ? "Transaction Never Finished " : "");
 173         return -1;
 174 }
 175
 176 static int ali1563_block(struct i2c_adapter * a, union i2c_smbus_data * data, u8 rw)
 177 {
 178         int i, len;
 179         int error = 0;
 180
 181         /* Do we need this? */
 182         outb_p(HST_CNTL1_LAST,SMB_HST_CNTL1);
 183
 184         if (rw == I2C_SMBUS_WRITE) {
 185                 len = data->block[0];
 186                 if (len < 1)
 187                         len = 1;
 188                 else if (len > 32)
 189                         len = 32;
 190                 outb_p(len,SMB_HST_DAT0);
 191                 outb_p(data->block[1],SMB_BLK_DAT);
 192         } else
 193                 len = 32;
 194
 195         outb_p(inb_p(SMB_HST_CNTL2) | HST_CNTL2_BLOCK, SMB_HST_CNTL2);
 196
 197         for (i = 0; i < len; i++) {
 198                 if (rw == I2C_SMBUS_WRITE) {
 199                         outb_p(data->block[i + 1], SMB_BLK_DAT);
 200                         if ((error = ali1563_block_start(a)))
 201                                 break;
 202                 } else {
 203                         if ((error = ali1563_block_start(a)))
 204                                 break;
 205                         if (i == 0) {
 206                                 len = inb_p(SMB_HST_DAT0);
 207                                 if (len < 1)
 208                                         len = 1;
 209                                 else if (len > 32)
 210                                         len = 32;
 211                         }
 212                         data->block[i+1] = inb_p(SMB_BLK_DAT);
 213                 }
 214         }
 215         /* Do we need this? */
 216         outb_p(HST_CNTL1_LAST,SMB_HST_CNTL1);
 217         return error;
 218 }
 219
 220 static s32 ali1563_access(struct i2c_adapter * a, u16 addr,
 221                           unsigned short flags, char rw, u8 cmd,
 222                           int size, union i2c_smbus_data * data)
 223 {
 224         int error = 0;
 225         int timeout;
 226         u32 reg;
 227
 228         for (timeout = ALI1563_MAX_TIMEOUT; timeout; timeout--) {
 229                 if (!(reg = inb_p(SMB_HST_STS) & HST_STS_BUSY))
 230                         break;
 231         }
 232         if (!timeout)
 233                 dev_warn(&a->dev,"SMBus not idle. HST_STS = %02x\n",reg);
 234         outb_p(0xff,SMB_HST_STS);
 235
 236         /* Map the size to what the chip understands */
 237         switch (size) {
 238         case I2C_SMBUS_PROC_CALL:
 239                 dev_err(&a->dev, "I2C_SMBUS_PROC_CALL not supported!\n");
 240                 error = -EINVAL;
 241                 break;
 242         case I2C_SMBUS_QUICK:
 243                 size = HST_CNTL2_QUICK;
 244                 break;
 245         case I2C_SMBUS_BYTE:
 246                 size = HST_CNTL2_BYTE;
 247                 break;
 248         case I2C_SMBUS_BYTE_DATA:
 249                 size = HST_CNTL2_BYTE_DATA;
 250                 break;
 251         case I2C_SMBUS_WORD_DATA:
 252                 size = HST_CNTL2_WORD_DATA;
 253                 break;
 254         case I2C_SMBUS_BLOCK_DATA:
 255                 size = HST_CNTL2_BLOCK;
 256                 break;
 257         }
 258
 259         outb_p(((addr & 0x7f) << 1) | (rw & 0x01), SMB_HST_ADD);
 260         outb_p((inb_p(SMB_HST_CNTL2) & ~HST_CNTL2_SIZEMASK) | (size << 3), SMB_HST_CNTL2);
 261
 262         /* Write the command register */
 263
 264         switch(size) {
 265         case HST_CNTL2_BYTE:
 266                 if (rw== I2C_SMBUS_WRITE)
 267                         /* Beware it uses DAT0 register and not CMD! */
 268                         outb_p(cmd, SMB_HST_DAT0);
 269                 break;
 270         case HST_CNTL2_BYTE_DATA:
 271                 outb_p(cmd, SMB_HST_CMD);
 272                 if (rw == I2C_SMBUS_WRITE)
 273                         outb_p(data->byte, SMB_HST_DAT0);
 274                 break;
 275         case HST_CNTL2_WORD_DATA:
 276                 outb_p(cmd, SMB_HST_CMD);
 277                 if (rw == I2C_SMBUS_WRITE) {
 278                         outb_p(data->word & 0xff, SMB_HST_DAT0);
 279                         outb_p((data->word & 0xff00) >> 8, SMB_HST_DAT1);
 280                 }
 281                 break;
 282         case HST_CNTL2_BLOCK:
 283                 outb_p(cmd, SMB_HST_CMD);
 284                 error = ali1563_block(a,data,rw);
 285                 goto Done;
 286         }
 287
 288         if ((error = ali1563_transaction(a, size)))
 289                 goto Done;
 290
 291         if ((rw == I2C_SMBUS_WRITE) || (size == HST_CNTL2_QUICK))
 292                 goto Done;
 293
 294         switch (size) {
 295         case HST_CNTL2_BYTE:    /* Result put in SMBHSTDAT0 */
 296                 data->byte = inb_p(SMB_HST_DAT0);
 297                 break;
 298         case HST_CNTL2_BYTE_DATA:
 299                 data->byte = inb_p(SMB_HST_DAT0);
 300                 break;
 301         case HST_CNTL2_WORD_DATA:
 302                 data->word = inb_p(SMB_HST_DAT0) + (inb_p(SMB_HST_DAT1) << 8);
 303                 break;
 304         }
 305 Done:
 306         return error;
 307 }
 308
 309 static u32 ali1563_func(struct i2c_adapter * a)
 310 {
 311         return I2C_FUNC_SMBUS_QUICK | I2C_FUNC_SMBUS_BYTE |
 312             I2C_FUNC_SMBUS_BYTE_DATA | I2C_FUNC_SMBUS_WORD_DATA |
 313             I2C_FUNC_SMBUS_BLOCK_DATA;
 314 }
 315
 316
 317 static void ali1563_enable(struct pci_dev * dev)
 318 {
 319         u16 ctrl;
 320
 321         pci_read_config_word(dev,ALI1563_SMBBA,&ctrl);
 322         ctrl |= 0x7;
 323         pci_write_config_word(dev,ALI1563_SMBBA,ctrl);
 324 }
 325
 326 static int __devinit ali1563_setup(struct pci_dev * dev)
 327 {
 328         u16 ctrl;
 329
 330         pci_read_config_word(dev,ALI1563_SMBBA,&ctrl);
 331         printk("ali1563: SMBus control = %04x\n",ctrl);
 332
 333         /* Check if device is even enabled first */
 334         if (!(ctrl & ALI1563_SMB_IOEN)) {
 335                 dev_warn(&dev->dev,"I/O space not enabled, trying manually\n");
 336                 ali1563_enable(dev);
 337         }
 338         if (!(ctrl & ALI1563_SMB_IOEN)) {
 339                 dev_warn(&dev->dev,"I/O space still not enabled, giving up\n");
 340                 goto Err;
 341         }
 342         if (!(ctrl & ALI1563_SMB_HOSTEN)) {
 343                 dev_warn(&dev->dev,"Host Controller not enabled\n");
 344                 goto Err;
 345         }
 346
 347         /* SMB I/O Base in high 12 bits and must be aligned with the
 348          * size of the I/O space. */
 349         ali1563_smba = ctrl & ~(ALI1563_SMB_IOSIZE - 1);
 350         if (!ali1563_smba) {
 351                 dev_warn(&dev->dev,"ali1563_smba Uninitialized\n");
 352                 goto Err;
 353         }
 354         if (!request_region(ali1563_smba, ALI1563_SMB_IOSIZE,
 355                             ali1563_pci_driver.name)) {
 356                 dev_warn(&dev->dev,"Could not allocate I/O space");
 357                 goto Err;
 358         }
 359
 360         return 0;
 361 Err:
 362         return -ENODEV;
 363 }
 364
 365 static void ali1563_shutdown(struct pci_dev *dev)
 366 {
 367         release_region(ali1563_smba,ALI1563_SMB_IOSIZE);
 368 }
 369
 370 static struct i2c_algorithm ali1563_algorithm = {
 371         .smbus_xfer     = ali1563_access,
 372         .functionality  = ali1563_func,
 373 };
 374
 375 static struct i2c_adapter ali1563_adapter = {
 376         .owner  = THIS_MODULE,
 377         .class  = I2C_CLASS_HWMON,
 378         .algo   = &ali1563_algorithm,
 379 };
 380
 381 static int __devinit ali1563_probe(struct pci_dev * dev,
 382                                 const struct pci_device_id * id_table)
 383 {
 384         int error;
 385
 386         if ((error = ali1563_setup(dev)))
 387                 return error;
 388         ali1563_adapter.dev.parent = &dev->dev;
 389         sprintf(ali1563_adapter.name,"SMBus ALi 1563 Adapter @ %04x",
 390                 ali1563_smba);
 391         if ((error = i2c_add_adapter(&ali1563_adapter)))
 392                 ali1563_shutdown(dev);
 393         printk("%s: Returning %d\n",__FUNCTION__,error);
 394         return error;
 395 }
 396
 397 static void __devexit ali1563_remove(struct pci_dev * dev)
 398 {
 399         i2c_del_adapter(&ali1563_adapter);
 400         ali1563_shutdown(dev);
 401 }
 402
 403 static struct pci_device_id __devinitdata ali1563_id_table[] = {
 404         { PCI_DEVICE(PCI_VENDOR_ID_AL, PCI_DEVICE_ID_AL_M1563) },
 405         {},
 406 };
 407
 408 MODULE_DEVICE_TABLE (pci, ali1563_id_table);
 409
 410 static struct pci_driver ali1563_pci_driver = {
 411         .name           = "ali1563_smbus",
 412         .id_table       = ali1563_id_table,
 413         .probe          = ali1563_probe,
 414         .remove         = __devexit_p(ali1563_remove),
 415 };
 416
 417 static int __init ali1563_init(void)
 418 {
 419         return pci_register_driver(&ali1563_pci_driver);
 420 }
 421
 422 module_init(ali1563_init);
 423
 424 static void __exit ali1563_exit(void)
 425 {
 426         pci_unregister_driver(&ali1563_pci_driver);
 427 }
 428
 429 module_exit(ali1563_exit);
 430
 431 MODULE_LICENSE("GPL");