drivers/i2c/busses/scx200_acb.c

   1 /*
   2     Copyright (c) 2001,2002 Christer Weinigel <wingel@nano-system.com>
   3
   4     National Semiconductor SCx200 ACCESS.bus support
   5     Also supports the AMD CS5535 and AMD CS5536
   6
   7     Based on i2c-keywest.c which is:
   8         Copyright (c) 2001 Benjamin Herrenschmidt <benh@kernel.crashing.org>
   9         Copyright (c) 2000 Philip Edelbrock <phil@stimpy.netroedge.com>
  10
  11     This program is free software; you can redistribute it and/or
  12     modify it under the terms of the GNU General Public License as
  13     published by the Free Software Foundation; either version 2 of the
  14     License, or (at your option) any later version.
  15
  16     This program is distributed in the hope that it will be useful,
  17     but WITHOUT ANY WARRANTY; without even the implied warranty of
  18     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19     General Public License for more details.
  20
  21     You should have received a copy of the GNU General Public License
  22     along with this program; if not, write to the Free Software
  23     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  24 */
  25
  26 #include <linux/module.h>
  27 #include <linux/errno.h>
  28 #include <linux/kernel.h>
  29 #include <linux/init.h>
  30 #include <linux/i2c.h>
  31 #include <linux/pci.h>
  32 #include <linux/platform_device.h>
  33 #include <linux/delay.h>
  34 #include <linux/mutex.h>
  35 #include <linux/slab.h>
  36 #include <linux/io.h>
  37
  38 #include <linux/scx200.h>
  39
  40 #define NAME "scx200_acb"
  41
  42 MODULE_AUTHOR("Christer Weinigel <wingel@nano-system.com>");
  43 MODULE_DESCRIPTION("NatSemi SCx200 ACCESS.bus Driver");
  44 MODULE_ALIAS("platform:cs5535-smb");
  45 MODULE_LICENSE("GPL");
  46
  47 #define MAX_DEVICES 4
  48 static int base[MAX_DEVICES] = { 0x820, 0x840 };
  49 module_param_array(base, int, NULL, 0);
  50 MODULE_PARM_DESC(base, "Base addresses for the ACCESS.bus controllers");
  51
  52 #define POLL_TIMEOUT    (HZ/5)
  53
  54 enum scx200_acb_state {
  55         state_idle,
  56         state_address,
  57         state_command,
  58         state_repeat_start,
  59         state_quick,
  60         state_read,
  61         state_write,
  62 };
  63
  64 static const char *scx200_acb_state_name[] = {
  65         "idle",
  66         "address",
  67         "command",
  68         "repeat_start",
  69         "quick",
  70         "read",
  71         "write",
  72 };
  73
  74 /* Physical interface */
  75 struct scx200_acb_iface {
  76         struct scx200_acb_iface *next;
  77         struct i2c_adapter adapter;
  78         unsigned base;
  79         struct mutex mutex;
  80
  81         /* State machine data */
  82         enum scx200_acb_state state;
  83         int result;
  84         u8 address_byte;
  85         u8 command;
  86         u8 *ptr;
  87         char needs_reset;
  88         unsigned len;
  89 };
  90
  91 /* Register Definitions */
  92 #define ACBSDA          (iface->base + 0)
  93 #define ACBST           (iface->base + 1)
  94 #define    ACBST_SDAST          0x40 /* SDA Status */
  95 #define    ACBST_BER            0x20
  96 #define    ACBST_NEGACK         0x10 /* Negative Acknowledge */
  97 #define    ACBST_STASTR         0x08 /* Stall After Start */
  98 #define    ACBST_MASTER         0x02
  99 #define ACBCST          (iface->base + 2)
 100 #define    ACBCST_BB            0x02
 101 #define ACBCTL1         (iface->base + 3)
 102 #define    ACBCTL1_STASTRE      0x80
 103 #define    ACBCTL1_NMINTE       0x40
 104 #define    ACBCTL1_ACK          0x10
 105 #define    ACBCTL1_STOP         0x02
 106 #define    ACBCTL1_START        0x01
 107 #define ACBADDR         (iface->base + 4)
 108 #define ACBCTL2         (iface->base + 5)
 109 #define    ACBCTL2_ENABLE       0x01
 110
 111 /************************************************************************/
 112
 113 static void scx200_acb_machine(struct scx200_acb_iface *iface, u8 status)
 114 {
 115         const char *errmsg;
 116
 117         dev_dbg(&iface->adapter.dev, "state %s, status = 0x%02x\n",
 118                 scx200_acb_state_name[iface->state], status);
 119
 120         if (status & ACBST_BER) {
 121                 errmsg = "bus error";
 122                 goto error;
 123         }
 124         if (!(status & ACBST_MASTER)) {
 125                 errmsg = "not master";
 126                 goto error;
 127         }
 128         if (status & ACBST_NEGACK) {
 129                 dev_dbg(&iface->adapter.dev, "negative ack in state %s\n",
 130                         scx200_acb_state_name[iface->state]);
 131
 132                 iface->state = state_idle;
 133                 iface->result = -ENXIO;
 134
 135                 outb(inb(ACBCTL1) | ACBCTL1_STOP, ACBCTL1);
 136                 outb(ACBST_STASTR | ACBST_NEGACK, ACBST);
 137
 138                 /* Reset the status register */
 139                 outb(0, ACBST);
 140                 return;
 141         }
 142
 143         switch (iface->state) {
 144         case state_idle:
 145                 dev_warn(&iface->adapter.dev, "interrupt in idle state\n");
 146                 break;
 147
 148         case state_address:
 149                 /* Do a pointer write first */
 150                 outb(iface->address_byte & ~1, ACBSDA);
 151
 152                 iface->state = state_command;
 153                 break;
 154
 155         case state_command:
 156                 outb(iface->command, ACBSDA);
 157
 158                 if (iface->address_byte & 1)
 159                         iface->state = state_repeat_start;
 160                 else
 161                         iface->state = state_write;
 162                 break;
 163
 164         case state_repeat_start:
 165                 outb(inb(ACBCTL1) | ACBCTL1_START, ACBCTL1);
 166                 /* fallthrough */
 167
 168         case state_quick:
 169                 if (iface->address_byte & 1) {
 170                         if (iface->len == 1)
 171                                 outb(inb(ACBCTL1) | ACBCTL1_ACK, ACBCTL1);
 172                         else
 173                                 outb(inb(ACBCTL1) & ~ACBCTL1_ACK, ACBCTL1);
 174                         outb(iface->address_byte, ACBSDA);
 175
 176                         iface->state = state_read;
 177                 } else {
 178                         outb(iface->address_byte, ACBSDA);
 179
 180                         iface->state = state_write;
 181                 }
 182                 break;
 183
 184         case state_read:
 185                 /* Set ACK if _next_ byte will be the last one */
 186                 if (iface->len == 2)
 187                         outb(inb(ACBCTL1) | ACBCTL1_ACK, ACBCTL1);
 188                 else
 189                         outb(inb(ACBCTL1) & ~ACBCTL1_ACK, ACBCTL1);
 190
 191                 if (iface->len == 1) {
 192                         iface->result = 0;
 193                         iface->state = state_idle;
 194                         outb(inb(ACBCTL1) | ACBCTL1_STOP, ACBCTL1);
 195                 }
 196
 197                 *iface->ptr++ = inb(ACBSDA);
 198                 --iface->len;
 199
 200                 break;
 201
 202         case state_write:
 203                 if (iface->len == 0) {
 204                         iface->result = 0;
 205                         iface->state = state_idle;
 206                         outb(inb(ACBCTL1) | ACBCTL1_STOP, ACBCTL1);
 207                         break;
 208                 }
 209
 210                 outb(*iface->ptr++, ACBSDA);
 211                 --iface->len;
 212
 213                 break;
 214         }
 215
 216         return;
 217
 218  error:
 219         dev_err(&iface->adapter.dev,
 220                 "%s in state %s (addr=0x%02x, len=%d, status=0x%02x)\n", errmsg,
 221                 scx200_acb_state_name[iface->state], iface->address_byte,
 222                 iface->len, status);
 223
 224         iface->state = state_idle;
 225         iface->result = -EIO;
 226         iface->needs_reset = 1;
 227 }
 228
 229 static void scx200_acb_poll(struct scx200_acb_iface *iface)
 230 {
 231         u8 status;
 232         unsigned long timeout;
 233
 234         timeout = jiffies + POLL_TIMEOUT;
 235         while (1) {
 236                 status = inb(ACBST);
 237
 238                 /* Reset the status register to avoid the hang */
 239                 outb(0, ACBST);
 240
 241                 if ((status & (ACBST_SDAST|ACBST_BER|ACBST_NEGACK)) != 0) {
 242                         scx200_acb_machine(iface, status);
 243                         return;
 244                 }
 245                 if (time_after(jiffies, timeout))
 246                         break;
 247                 cpu_relax();
 248                 cond_resched();
 249         }
 250
 251         dev_err(&iface->adapter.dev, "timeout in state %s\n",
 252                 scx200_acb_state_name[iface->state]);
 253
 254         iface->state = state_idle;
 255         iface->result = -EIO;
 256         iface->needs_reset = 1;
 257 }
 258
 259 static void scx200_acb_reset(struct scx200_acb_iface *iface)
 260 {
 261         /* Disable the ACCESS.bus device and Configure the SCL
 262            frequency: 16 clock cycles */
 263         outb(0x70, ACBCTL2);
 264         /* Polling mode */
 265         outb(0, ACBCTL1);
 266         /* Disable slave address */
 267         outb(0, ACBADDR);
 268         /* Enable the ACCESS.bus device */
 269         outb(inb(ACBCTL2) | ACBCTL2_ENABLE, ACBCTL2);
 270         /* Free STALL after START */
 271         outb(inb(ACBCTL1) & ~(ACBCTL1_STASTRE | ACBCTL1_NMINTE), ACBCTL1);
 272         /* Send a STOP */
 273         outb(inb(ACBCTL1) | ACBCTL1_STOP, ACBCTL1);
 274         /* Clear BER, NEGACK and STASTR bits */
 275         outb(ACBST_BER | ACBST_NEGACK | ACBST_STASTR, ACBST);
 276         /* Clear BB bit */
 277         outb(inb(ACBCST) | ACBCST_BB, ACBCST);
 278 }
 279
 280 static s32 scx200_acb_smbus_xfer(struct i2c_adapter *adapter,
 281                                  u16 address, unsigned short flags,
 282                                  char rw, u8 command, int size,
 283                                  union i2c_smbus_data *data)
 284 {
 285         struct scx200_acb_iface *iface = i2c_get_adapdata(adapter);
 286         int len;
 287         u8 *buffer;
 288         u16 cur_word;
 289         int rc;
 290
 291         switch (size) {
 292         case I2C_SMBUS_QUICK:
 293                 len = 0;
 294                 buffer = NULL;
 295                 break;
 296
 297         case I2C_SMBUS_BYTE:
 298                 len = 1;
 299                 buffer = rw ? &data->byte : &command;
 300                 break;
 301
 302         case I2C_SMBUS_BYTE_DATA:
 303                 len = 1;
 304                 buffer = &data->byte;
 305                 break;
 306
 307         case I2C_SMBUS_WORD_DATA:
 308                 len = 2;
 309                 cur_word = cpu_to_le16(data->word);
 310                 buffer = (u8 *)&cur_word;
 311                 break;
 312
 313         case I2C_SMBUS_I2C_BLOCK_DATA:
 314                 len = data->block[0];
 315                 if (len == 0 || len > I2C_SMBUS_BLOCK_MAX)
 316                         return -EINVAL;
 317                 buffer = &data->block[1];
 318                 break;
 319
 320         default:
 321                 return -EINVAL;
 322         }
 323
 324         dev_dbg(&adapter->dev,
 325                 "size=%d, address=0x%x, command=0x%x, len=%d, read=%d\n",
 326                 size, address, command, len, rw);
 327
 328         if (!len && rw == I2C_SMBUS_READ) {
 329                 dev_dbg(&adapter->dev, "zero length read\n");
 330                 return -EINVAL;
 331         }
 332
 333         mutex_lock(&iface->mutex);
 334
 335         iface->address_byte = (address << 1) | rw;
 336         iface->command = command;
 337         iface->ptr = buffer;
 338         iface->len = len;
 339         iface->result = -EINVAL;
 340         iface->needs_reset = 0;
 341
 342         outb(inb(ACBCTL1) | ACBCTL1_START, ACBCTL1);
 343
 344         if (size == I2C_SMBUS_QUICK || size == I2C_SMBUS_BYTE)
 345                 iface->state = state_quick;
 346         else
 347                 iface->state = state_address;
 348
 349         while (iface->state != state_idle)
 350                 scx200_acb_poll(iface);
 351
 352         if (iface->needs_reset)
 353                 scx200_acb_reset(iface);
 354
 355         rc = iface->result;
 356
 357         mutex_unlock(&iface->mutex);
 358
 359         if (rc == 0 && size == I2C_SMBUS_WORD_DATA && rw == I2C_SMBUS_READ)
 360                 data->word = le16_to_cpu(cur_word);
 361
 362 #ifdef DEBUG
 363         dev_dbg(&adapter->dev, "transfer done, result: %d", rc);
 364         if (buffer) {
 365                 int i;
 366                 printk(" data:");
 367                 for (i = 0; i < len; ++i)
 368                         printk(" %02x", buffer[i]);
 369         }
 370         printk("\n");
 371 #endif
 372
 373         return rc;
 374 }
 375
 376 static u32 scx200_acb_func(struct i2c_adapter *adapter)
 377 {
 378         return I2C_FUNC_SMBUS_QUICK | I2C_FUNC_SMBUS_BYTE |
 379                I2C_FUNC_SMBUS_BYTE_DATA | I2C_FUNC_SMBUS_WORD_DATA |
 380                I2C_FUNC_SMBUS_I2C_BLOCK;
 381 }
 382
 383 /* For now, we only handle combined mode (smbus) */
 384 static const struct i2c_algorithm scx200_acb_algorithm = {
 385         .smbus_xfer     = scx200_acb_smbus_xfer,
 386         .functionality  = scx200_acb_func,
 387 };
 388
 389 static struct scx200_acb_iface *scx200_acb_list;
 390 static DEFINE_MUTEX(scx200_acb_list_mutex);
 391
 392 static __devinit int scx200_acb_probe(struct scx200_acb_iface *iface)
 393 {
 394         u8 val;
 395
 396         /* Disable the ACCESS.bus device and Configure the SCL
 397            frequency: 16 clock cycles */
 398         outb(0x70, ACBCTL2);
 399
 400         if (inb(ACBCTL2) != 0x70) {
 401                 pr_debug(NAME ": ACBCTL2 readback failed\n");
 402                 return -ENXIO;
 403         }
 404
 405         outb(inb(ACBCTL1) | ACBCTL1_NMINTE, ACBCTL1);
 406
 407         val = inb(ACBCTL1);
 408         if (val) {
 409                 pr_debug(NAME ": disabled, but ACBCTL1=0x%02x\n",
 410                         val);
 411                 return -ENXIO;
 412         }
 413
 414         outb(inb(ACBCTL2) | ACBCTL2_ENABLE, ACBCTL2);
 415
 416         outb(inb(ACBCTL1) | ACBCTL1_NMINTE, ACBCTL1);
 417
 418         val = inb(ACBCTL1);
 419         if ((val & ACBCTL1_NMINTE) != ACBCTL1_NMINTE) {
 420                 pr_debug(NAME ": enabled, but NMINTE won't be set, "
 421                          "ACBCTL1=0x%02x\n", val);
 422                 return -ENXIO;
 423         }
 424
 425         return 0;
 426 }
 427
 428 static __devinit struct scx200_acb_iface *scx200_create_iface(const char *text,
 429                 struct device *dev, int index)
 430 {
 431         struct scx200_acb_iface *iface;
 432         struct i2c_adapter *adapter;
 433
 434         iface = kzalloc(sizeof(*iface), GFP_KERNEL);
 435         if (!iface) {
 436                 printk(KERN_ERR NAME ": can't allocate memory\n");
 437                 return NULL;
 438         }
 439
 440         adapter = &iface->adapter;
 441         i2c_set_adapdata(adapter, iface);
 442         snprintf(adapter->name, sizeof(adapter->name), "%s ACB%d", text, index);
 443         adapter->owner = THIS_MODULE;
 444         adapter->algo = &scx200_acb_algorithm;
 445         adapter->class = I2C_CLASS_HWMON | I2C_CLASS_SPD;
 446         adapter->dev.parent = dev;
 447
 448         mutex_init(&iface->mutex);
 449
 450         return iface;
 451 }
 452
 453 static int __devinit scx200_acb_create(struct scx200_acb_iface *iface)
 454 {
 455         struct i2c_adapter *adapter;
 456         int rc;
 457
 458         adapter = &iface->adapter;
 459
 460         rc = scx200_acb_probe(iface);
 461         if (rc) {
 462                 printk(KERN_WARNING NAME ": probe failed\n");
 463                 return rc;
 464         }
 465
 466         scx200_acb_reset(iface);
 467
 468         if (i2c_add_adapter(adapter) < 0) {
 469                 printk(KERN_ERR NAME ": failed to register\n");
 470                 return -ENODEV;
 471         }
 472
 473         if (!adapter->dev.parent) {
 474                 /* If there's no dev, we're tracking (ISA) ifaces manually */
 475                 mutex_lock(&scx200_acb_list_mutex);
 476                 iface->next = scx200_acb_list;
 477                 scx200_acb_list = iface;
 478                 mutex_unlock(&scx200_acb_list_mutex);
 479         }
 480
 481         return 0;
 482 }
 483
 484 static struct scx200_acb_iface * __devinit scx200_create_dev(const char *text,
 485                 unsigned long base, int index, struct device *dev)
 486 {
 487         struct scx200_acb_iface *iface;
 488         int rc;
 489
 490         iface = scx200_create_iface(text, dev, index);
 491
 492         if (iface == NULL)
 493                 return NULL;
 494
 495         if (!request_region(base, 8, iface->adapter.name)) {
 496                 printk(KERN_ERR NAME ": can't allocate io 0x%lx-0x%lx\n",
 497                        base, base + 8 - 1);
 498                 goto errout_free;
 499         }
 500
 501         iface->base = base;
 502         rc = scx200_acb_create(iface);
 503
 504         if (rc == 0)
 505                 return iface;
 506
 507         release_region(base, 8);
 508  errout_free:
 509         kfree(iface);
 510         return NULL;
 511 }
 512
 513 static int __devinit scx200_probe(struct platform_device *pdev)
 514 {
 515         struct scx200_acb_iface *iface;
 516         struct resource *res;
 517
 518         res = platform_get_resource(pdev, IORESOURCE_IO, 0);
 519         if (!res) {
 520                 dev_err(&pdev->dev, "can't fetch device resource info\n");
 521                 return -ENODEV;
 522         }
 523
 524         iface = scx200_create_dev("CS5535", res->start, 0, &pdev->dev);
 525         if (!iface)
 526                 return -EIO;
 527
 528         dev_info(&pdev->dev, "SCx200 device '%s' registered\n",
 529                         iface->adapter.name);
 530         platform_set_drvdata(pdev, iface);
 531
 532         return 0;
 533 }
 534
 535 static void __devexit scx200_cleanup_iface(struct scx200_acb_iface *iface)
 536 {
 537         i2c_del_adapter(&iface->adapter);
 538         release_region(iface->base, 8);
 539         kfree(iface);
 540 }
 541
 542 static int __devexit scx200_remove(struct platform_device *pdev)
 543 {
 544         struct scx200_acb_iface *iface;
 545
 546         iface = platform_get_drvdata(pdev);
 547         platform_set_drvdata(pdev, NULL);
 548         scx200_cleanup_iface(iface);
 549
 550         return 0;
 551 }
 552
 553 static struct platform_driver scx200_pci_drv = {
 554         .driver = {
 555                 .name = "cs5535-smb",
 556                 .owner = THIS_MODULE,
 557         },
 558         .probe = scx200_probe,
 559         .remove = __devexit_p(scx200_remove),
 560 };
 561
 562 static const struct pci_device_id scx200_isa[] __initconst = {
 563         { PCI_DEVICE(PCI_VENDOR_ID_NS, PCI_DEVICE_ID_NS_SCx200_BRIDGE) },
 564         { PCI_DEVICE(PCI_VENDOR_ID_NS, PCI_DEVICE_ID_NS_SC1100_BRIDGE) },
 565         { 0, }
 566 };
 567
 568 static __init void scx200_scan_isa(void)
 569 {
 570         int i;
 571
 572         if (!pci_dev_present(scx200_isa))
 573                 return;
 574
 575         for (i = 0; i < MAX_DEVICES; ++i) {
 576                 if (base[i] == 0)
 577                         continue;
 578
 579                 /* XXX: should we care about failures? */
 580                 scx200_create_dev("SCx200", base[i], i, NULL);
 581         }
 582 }
 583
 584 static int __init scx200_acb_init(void)
 585 {
 586         pr_debug(NAME ": NatSemi SCx200 ACCESS.bus Driver\n");
 587
 588         /* First scan for ISA-based devices */
 589         scx200_scan_isa();      /* XXX: should we care about errors? */
 590
 591         /* If at least one bus was created, init must succeed */
 592         if (scx200_acb_list)
 593                 return 0;
 594
 595         /* No ISA devices; register the platform driver for PCI-based devices */
 596         return platform_driver_register(&scx200_pci_drv);
 597 }
 598
 599 static void __exit scx200_acb_cleanup(void)
 600 {
 601         struct scx200_acb_iface *iface;
 602
 603         platform_driver_unregister(&scx200_pci_drv);
 604
 605         mutex_lock(&scx200_acb_list_mutex);
 606         while ((iface = scx200_acb_list) != NULL) {
 607                 scx200_acb_list = iface->next;
 608                 mutex_unlock(&scx200_acb_list_mutex);
 609
 610                 scx200_cleanup_iface(iface);
 611
 612                 mutex_lock(&scx200_acb_list_mutex);
 613         }
 614         mutex_unlock(&scx200_acb_list_mutex);
 615 }
 616
 617 module_init(scx200_acb_init);
 618 module_exit(scx200_acb_cleanup);