| /* |
| * (C) Copyright 2003-2004 |
| * Humboldt Solutions Ltd, adrian@humboldt.co.uk. |
| |
| * This is a combined i2c adapter and algorithm driver for the |
| * MPC107/Tsi107 PowerPC northbridge and processors that include |
| * the same I2C unit (8240, 8245, 85xx). |
| * |
| * Release 0.8 |
| * |
| * This file is licensed under the terms of the GNU General Public |
| * License version 2. This program is licensed "as is" without any |
| * warranty of any kind, whether express or implied. |
| */ |
| |
| #include <linux/kernel.h> |
| #include <linux/module.h> |
| #include <linux/sched.h> |
| #include <linux/init.h> |
| #include <linux/of_platform.h> |
| #include <linux/of_i2c.h> |
| |
| #include <asm/io.h> |
| #include <linux/fsl_devices.h> |
| #include <linux/i2c.h> |
| #include <linux/interrupt.h> |
| #include <linux/delay.h> |
| |
| #define DRV_NAME "mpc-i2c" |
| |
| #define MPC_I2C_FDR 0x04 |
| #define MPC_I2C_CR 0x08 |
| #define MPC_I2C_SR 0x0c |
| #define MPC_I2C_DR 0x10 |
| #define MPC_I2C_DFSRR 0x14 |
| |
| #define CCR_MEN 0x80 |
| #define CCR_MIEN 0x40 |
| #define CCR_MSTA 0x20 |
| #define CCR_MTX 0x10 |
| #define CCR_TXAK 0x08 |
| #define CCR_RSTA 0x04 |
| |
| #define CSR_MCF 0x80 |
| #define CSR_MAAS 0x40 |
| #define CSR_MBB 0x20 |
| #define CSR_MAL 0x10 |
| #define CSR_SRW 0x04 |
| #define CSR_MIF 0x02 |
| #define CSR_RXAK 0x01 |
| |
| struct mpc_i2c { |
| void __iomem *base; |
| u32 interrupt; |
| wait_queue_head_t queue; |
| struct i2c_adapter adap; |
| int irq; |
| u32 flags; |
| }; |
| |
| static __inline__ void writeccr(struct mpc_i2c *i2c, u32 x) |
| { |
| writeb(x, i2c->base + MPC_I2C_CR); |
| } |
| |
| static irqreturn_t mpc_i2c_isr(int irq, void *dev_id) |
| { |
| struct mpc_i2c *i2c = dev_id; |
| if (readb(i2c->base + MPC_I2C_SR) & CSR_MIF) { |
| /* Read again to allow register to stabilise */ |
| i2c->interrupt = readb(i2c->base + MPC_I2C_SR); |
| writeb(0, i2c->base + MPC_I2C_SR); |
| wake_up_interruptible(&i2c->queue); |
| } |
| return IRQ_HANDLED; |
| } |
| |
| /* Sometimes 9th clock pulse isn't generated, and slave doesn't release |
| * the bus, because it wants to send ACK. |
| * Following sequence of enabling/disabling and sending start/stop generates |
| * the pulse, so it's all OK. |
| */ |
| static void mpc_i2c_fixup(struct mpc_i2c *i2c) |
| { |
| writeccr(i2c, 0); |
| udelay(30); |
| writeccr(i2c, CCR_MEN); |
| udelay(30); |
| writeccr(i2c, CCR_MSTA | CCR_MTX); |
| udelay(30); |
| writeccr(i2c, CCR_MSTA | CCR_MTX | CCR_MEN); |
| udelay(30); |
| writeccr(i2c, CCR_MEN); |
| udelay(30); |
| } |
| |
| static int i2c_wait(struct mpc_i2c *i2c, unsigned timeout, int writing) |
| { |
| unsigned long orig_jiffies = jiffies; |
| u32 x; |
| int result = 0; |
| |
| if (i2c->irq == NO_IRQ) |
| { |
| while (!(readb(i2c->base + MPC_I2C_SR) & CSR_MIF)) { |
| schedule(); |
| if (time_after(jiffies, orig_jiffies + timeout)) { |
| pr_debug("I2C: timeout\n"); |
| writeccr(i2c, 0); |
| result = -EIO; |
| break; |
| } |
| } |
| x = readb(i2c->base + MPC_I2C_SR); |
| writeb(0, i2c->base + MPC_I2C_SR); |
| } else { |
| /* Interrupt mode */ |
| result = wait_event_interruptible_timeout(i2c->queue, |
| (i2c->interrupt & CSR_MIF), timeout * HZ); |
| |
| if (unlikely(result < 0)) { |
| pr_debug("I2C: wait interrupted\n"); |
| writeccr(i2c, 0); |
| } else if (unlikely(!(i2c->interrupt & CSR_MIF))) { |
| pr_debug("I2C: wait timeout\n"); |
| writeccr(i2c, 0); |
| result = -ETIMEDOUT; |
| } |
| |
| x = i2c->interrupt; |
| i2c->interrupt = 0; |
| } |
| |
| if (result < 0) |
| return result; |
| |
| if (!(x & CSR_MCF)) { |
| pr_debug("I2C: unfinished\n"); |
| return -EIO; |
| } |
| |
| if (x & CSR_MAL) { |
| pr_debug("I2C: MAL\n"); |
| return -EIO; |
| } |
| |
| if (writing && (x & CSR_RXAK)) { |
| pr_debug("I2C: No RXAK\n"); |
| /* generate stop */ |
| writeccr(i2c, CCR_MEN); |
| return -EIO; |
| } |
| return 0; |
| } |
| |
| static void mpc_i2c_setclock(struct mpc_i2c *i2c) |
| { |
| /* Set clock and filters */ |
| if (i2c->flags & FSL_I2C_DEV_SEPARATE_DFSRR) { |
| writeb(0x31, i2c->base + MPC_I2C_FDR); |
| writeb(0x10, i2c->base + MPC_I2C_DFSRR); |
| } else if (i2c->flags & FSL_I2C_DEV_CLOCK_5200) |
| writeb(0x3f, i2c->base + MPC_I2C_FDR); |
| else |
| writel(0x1031, i2c->base + MPC_I2C_FDR); |
| } |
| |
| static void mpc_i2c_start(struct mpc_i2c *i2c) |
| { |
| /* Clear arbitration */ |
| writeb(0, i2c->base + MPC_I2C_SR); |
| /* Start with MEN */ |
| writeccr(i2c, CCR_MEN); |
| } |
| |
| static void mpc_i2c_stop(struct mpc_i2c *i2c) |
| { |
| writeccr(i2c, CCR_MEN); |
| } |
| |
| static int mpc_write(struct mpc_i2c *i2c, int target, |
| const u8 * data, int length, int restart) |
| { |
| int i, result; |
| unsigned timeout = i2c->adap.timeout; |
| u32 flags = restart ? CCR_RSTA : 0; |
| |
| /* Start with MEN */ |
| if (!restart) |
| writeccr(i2c, CCR_MEN); |
| /* Start as master */ |
| writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA | CCR_MTX | flags); |
| /* Write target byte */ |
| writeb((target << 1), i2c->base + MPC_I2C_DR); |
| |
| result = i2c_wait(i2c, timeout, 1); |
| if (result < 0) |
| return result; |
| |
| for (i = 0; i < length; i++) { |
| /* Write data byte */ |
| writeb(data[i], i2c->base + MPC_I2C_DR); |
| |
| result = i2c_wait(i2c, timeout, 1); |
| if (result < 0) |
| return result; |
| } |
| |
| return 0; |
| } |
| |
| static int mpc_read(struct mpc_i2c *i2c, int target, |
| u8 * data, int length, int restart) |
| { |
| unsigned timeout = i2c->adap.timeout; |
| int i, result; |
| u32 flags = restart ? CCR_RSTA : 0; |
| |
| /* Start with MEN */ |
| if (!restart) |
| writeccr(i2c, CCR_MEN); |
| /* Switch to read - restart */ |
| writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA | CCR_MTX | flags); |
| /* Write target address byte - this time with the read flag set */ |
| writeb((target << 1) | 1, i2c->base + MPC_I2C_DR); |
| |
| result = i2c_wait(i2c, timeout, 1); |
| if (result < 0) |
| return result; |
| |
| if (length) { |
| if (length == 1) |
| writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA | CCR_TXAK); |
| else |
| writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA); |
| /* Dummy read */ |
| readb(i2c->base + MPC_I2C_DR); |
| } |
| |
| for (i = 0; i < length; i++) { |
| result = i2c_wait(i2c, timeout, 0); |
| if (result < 0) |
| return result; |
| |
| /* Generate txack on next to last byte */ |
| if (i == length - 2) |
| writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA | CCR_TXAK); |
| /* Generate stop on last byte */ |
| if (i == length - 1) |
| writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_TXAK); |
| data[i] = readb(i2c->base + MPC_I2C_DR); |
| } |
| |
| return length; |
| } |
| |
| static int mpc_xfer(struct i2c_adapter *adap, struct i2c_msg *msgs, int num) |
| { |
| struct i2c_msg *pmsg; |
| int i; |
| int ret = 0; |
| unsigned long orig_jiffies = jiffies; |
| struct mpc_i2c *i2c = i2c_get_adapdata(adap); |
| |
| mpc_i2c_start(i2c); |
| |
| /* Allow bus up to 1s to become not busy */ |
| while (readb(i2c->base + MPC_I2C_SR) & CSR_MBB) { |
| if (signal_pending(current)) { |
| pr_debug("I2C: Interrupted\n"); |
| writeccr(i2c, 0); |
| return -EINTR; |
| } |
| if (time_after(jiffies, orig_jiffies + HZ)) { |
| pr_debug("I2C: timeout\n"); |
| if (readb(i2c->base + MPC_I2C_SR) == |
| (CSR_MCF | CSR_MBB | CSR_RXAK)) |
| mpc_i2c_fixup(i2c); |
| return -EIO; |
| } |
| schedule(); |
| } |
| |
| for (i = 0; ret >= 0 && i < num; i++) { |
| pmsg = &msgs[i]; |
| pr_debug("Doing %s %d bytes to 0x%02x - %d of %d messages\n", |
| pmsg->flags & I2C_M_RD ? "read" : "write", |
| pmsg->len, pmsg->addr, i + 1, num); |
| if (pmsg->flags & I2C_M_RD) |
| ret = |
| mpc_read(i2c, pmsg->addr, pmsg->buf, pmsg->len, i); |
| else |
| ret = |
| mpc_write(i2c, pmsg->addr, pmsg->buf, pmsg->len, i); |
| } |
| mpc_i2c_stop(i2c); |
| return (ret < 0) ? ret : num; |
| } |
| |
| static u32 mpc_functionality(struct i2c_adapter *adap) |
| { |
| return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL; |
| } |
| |
| static const struct i2c_algorithm mpc_algo = { |
| .master_xfer = mpc_xfer, |
| .functionality = mpc_functionality, |
| }; |
| |
| static struct i2c_adapter mpc_ops = { |
| .owner = THIS_MODULE, |
| .name = "MPC adapter", |
| .id = I2C_HW_MPC107, |
| .algo = &mpc_algo, |
| .class = I2C_CLASS_HWMON | I2C_CLASS_SPD, |
| .timeout = 1, |
| }; |
| |
| static int __devinit fsl_i2c_probe(struct of_device *op, const struct of_device_id *match) |
| { |
| int result = 0; |
| struct mpc_i2c *i2c; |
| |
| i2c = kzalloc(sizeof(*i2c), GFP_KERNEL); |
| if (!i2c) |
| return -ENOMEM; |
| |
| if (of_get_property(op->node, "dfsrr", NULL)) |
| i2c->flags |= FSL_I2C_DEV_SEPARATE_DFSRR; |
| |
| if (of_device_is_compatible(op->node, "fsl,mpc5200-i2c") || |
| of_device_is_compatible(op->node, "mpc5200-i2c")) |
| i2c->flags |= FSL_I2C_DEV_CLOCK_5200; |
| |
| init_waitqueue_head(&i2c->queue); |
| |
| i2c->base = of_iomap(op->node, 0); |
| if (!i2c->base) { |
| printk(KERN_ERR "i2c-mpc - failed to map controller\n"); |
| result = -ENOMEM; |
| goto fail_map; |
| } |
| |
| i2c->irq = irq_of_parse_and_map(op->node, 0); |
| if (i2c->irq != NO_IRQ) { /* i2c->irq = NO_IRQ implies polling */ |
| result = request_irq(i2c->irq, mpc_i2c_isr, |
| IRQF_SHARED, "i2c-mpc", i2c); |
| if (result < 0) { |
| printk(KERN_ERR "i2c-mpc - failed to attach interrupt\n"); |
| goto fail_request; |
| } |
| } |
| |
| mpc_i2c_setclock(i2c); |
| |
| dev_set_drvdata(&op->dev, i2c); |
| |
| i2c->adap = mpc_ops; |
| i2c_set_adapdata(&i2c->adap, i2c); |
| i2c->adap.dev.parent = &op->dev; |
| |
| result = i2c_add_adapter(&i2c->adap); |
| if (result < 0) { |
| printk(KERN_ERR "i2c-mpc - failed to add adapter\n"); |
| goto fail_add; |
| } |
| of_register_i2c_devices(&i2c->adap, op->node); |
| |
| return result; |
| |
| fail_add: |
| dev_set_drvdata(&op->dev, NULL); |
| free_irq(i2c->irq, i2c); |
| fail_request: |
| irq_dispose_mapping(i2c->irq); |
| iounmap(i2c->base); |
| fail_map: |
| kfree(i2c); |
| return result; |
| }; |
| |
| static int __devexit fsl_i2c_remove(struct of_device *op) |
| { |
| struct mpc_i2c *i2c = dev_get_drvdata(&op->dev); |
| |
| i2c_del_adapter(&i2c->adap); |
| dev_set_drvdata(&op->dev, NULL); |
| |
| if (i2c->irq != NO_IRQ) |
| free_irq(i2c->irq, i2c); |
| |
| irq_dispose_mapping(i2c->irq); |
| iounmap(i2c->base); |
| kfree(i2c); |
| return 0; |
| }; |
| |
| static const struct of_device_id mpc_i2c_of_match[] = { |
| {.compatible = "fsl-i2c",}, |
| {}, |
| }; |
| MODULE_DEVICE_TABLE(of, mpc_i2c_of_match); |
| |
| |
| /* Structure for a device driver */ |
| static struct of_platform_driver mpc_i2c_driver = { |
| .match_table = mpc_i2c_of_match, |
| .probe = fsl_i2c_probe, |
| .remove = __devexit_p(fsl_i2c_remove), |
| .driver = { |
| .owner = THIS_MODULE, |
| .name = DRV_NAME, |
| }, |
| }; |
| |
| static int __init fsl_i2c_init(void) |
| { |
| int rv; |
| |
| rv = of_register_platform_driver(&mpc_i2c_driver); |
| if (rv) |
| printk(KERN_ERR DRV_NAME |
| " of_register_platform_driver failed (%i)\n", rv); |
| return rv; |
| } |
| |
| static void __exit fsl_i2c_exit(void) |
| { |
| of_unregister_platform_driver(&mpc_i2c_driver); |
| } |
| |
| module_init(fsl_i2c_init); |
| module_exit(fsl_i2c_exit); |
| |
| MODULE_AUTHOR("Adrian Cox <adrian@humboldt.co.uk>"); |
| MODULE_DESCRIPTION |
| ("I2C-Bus adapter for MPC107 bridge and MPC824x/85xx/52xx processors"); |
| MODULE_LICENSE("GPL"); |