| /* bbc_i2c.c: I2C low-level driver for BBC device on UltraSPARC-III |
| * platforms. |
| * |
| * Copyright (C) 2001, 2008 David S. Miller (davem@davemloft.net) |
| */ |
| |
| #include <linux/module.h> |
| #include <linux/kernel.h> |
| #include <linux/types.h> |
| #include <linux/slab.h> |
| #include <linux/sched.h> |
| #include <linux/wait.h> |
| #include <linux/delay.h> |
| #include <linux/init.h> |
| #include <linux/interrupt.h> |
| #include <linux/of.h> |
| #include <linux/of_device.h> |
| #include <asm/bbc.h> |
| #include <asm/io.h> |
| |
| #include "bbc_i2c.h" |
| |
| /* Convert this driver to use i2c bus layer someday... */ |
| #define I2C_PCF_PIN 0x80 |
| #define I2C_PCF_ESO 0x40 |
| #define I2C_PCF_ES1 0x20 |
| #define I2C_PCF_ES2 0x10 |
| #define I2C_PCF_ENI 0x08 |
| #define I2C_PCF_STA 0x04 |
| #define I2C_PCF_STO 0x02 |
| #define I2C_PCF_ACK 0x01 |
| |
| #define I2C_PCF_START (I2C_PCF_PIN | I2C_PCF_ESO | I2C_PCF_ENI | I2C_PCF_STA | I2C_PCF_ACK) |
| #define I2C_PCF_STOP (I2C_PCF_PIN | I2C_PCF_ESO | I2C_PCF_STO | I2C_PCF_ACK) |
| #define I2C_PCF_REPSTART ( I2C_PCF_ESO | I2C_PCF_STA | I2C_PCF_ACK) |
| #define I2C_PCF_IDLE (I2C_PCF_PIN | I2C_PCF_ESO | I2C_PCF_ACK) |
| |
| #define I2C_PCF_INI 0x40 /* 1 if not initialized */ |
| #define I2C_PCF_STS 0x20 |
| #define I2C_PCF_BER 0x10 |
| #define I2C_PCF_AD0 0x08 |
| #define I2C_PCF_LRB 0x08 |
| #define I2C_PCF_AAS 0x04 |
| #define I2C_PCF_LAB 0x02 |
| #define I2C_PCF_BB 0x01 |
| |
| /* The BBC devices have two I2C controllers. The first I2C controller |
| * connects mainly to configuration proms (NVRAM, cpu configuration, |
| * dimm types, etc.). Whereas the second I2C controller connects to |
| * environmental control devices such as fans and temperature sensors. |
| * The second controller also connects to the smartcard reader, if present. |
| */ |
| |
| static void set_device_claimage(struct bbc_i2c_bus *bp, struct of_device *op, int val) |
| { |
| int i; |
| |
| for (i = 0; i < NUM_CHILDREN; i++) { |
| if (bp->devs[i].device == op) { |
| bp->devs[i].client_claimed = val; |
| return; |
| } |
| } |
| } |
| |
| #define claim_device(BP,ECHILD) set_device_claimage(BP,ECHILD,1) |
| #define release_device(BP,ECHILD) set_device_claimage(BP,ECHILD,0) |
| |
| struct of_device *bbc_i2c_getdev(struct bbc_i2c_bus *bp, int index) |
| { |
| struct of_device *op = NULL; |
| int curidx = 0, i; |
| |
| for (i = 0; i < NUM_CHILDREN; i++) { |
| if (!(op = bp->devs[i].device)) |
| break; |
| if (curidx == index) |
| goto out; |
| op = NULL; |
| curidx++; |
| } |
| |
| out: |
| if (curidx == index) |
| return op; |
| return NULL; |
| } |
| |
| struct bbc_i2c_client *bbc_i2c_attach(struct bbc_i2c_bus *bp, struct of_device *op) |
| { |
| struct bbc_i2c_client *client; |
| const u32 *reg; |
| |
| client = kzalloc(sizeof(*client), GFP_KERNEL); |
| if (!client) |
| return NULL; |
| client->bp = bp; |
| client->op = op; |
| |
| reg = of_get_property(op->node, "reg", NULL); |
| if (!reg) { |
| kfree(client); |
| return NULL; |
| } |
| |
| client->bus = reg[0]; |
| client->address = reg[1]; |
| |
| claim_device(bp, op); |
| |
| return client; |
| } |
| |
| void bbc_i2c_detach(struct bbc_i2c_client *client) |
| { |
| struct bbc_i2c_bus *bp = client->bp; |
| struct of_device *op = client->op; |
| |
| release_device(bp, op); |
| kfree(client); |
| } |
| |
| static int wait_for_pin(struct bbc_i2c_bus *bp, u8 *status) |
| { |
| DECLARE_WAITQUEUE(wait, current); |
| int limit = 32; |
| int ret = 1; |
| |
| bp->waiting = 1; |
| add_wait_queue(&bp->wq, &wait); |
| while (limit-- > 0) { |
| unsigned long val; |
| |
| val = wait_event_interruptible_timeout( |
| bp->wq, |
| (((*status = readb(bp->i2c_control_regs + 0)) |
| & I2C_PCF_PIN) == 0), |
| msecs_to_jiffies(250)); |
| if (val > 0) { |
| ret = 0; |
| break; |
| } |
| } |
| remove_wait_queue(&bp->wq, &wait); |
| bp->waiting = 0; |
| |
| return ret; |
| } |
| |
| int bbc_i2c_writeb(struct bbc_i2c_client *client, unsigned char val, int off) |
| { |
| struct bbc_i2c_bus *bp = client->bp; |
| int address = client->address; |
| u8 status; |
| int ret = -1; |
| |
| if (bp->i2c_bussel_reg != NULL) |
| writeb(client->bus, bp->i2c_bussel_reg); |
| |
| writeb(address, bp->i2c_control_regs + 0x1); |
| writeb(I2C_PCF_START, bp->i2c_control_regs + 0x0); |
| if (wait_for_pin(bp, &status)) |
| goto out; |
| |
| writeb(off, bp->i2c_control_regs + 0x1); |
| if (wait_for_pin(bp, &status) || |
| (status & I2C_PCF_LRB) != 0) |
| goto out; |
| |
| writeb(val, bp->i2c_control_regs + 0x1); |
| if (wait_for_pin(bp, &status)) |
| goto out; |
| |
| ret = 0; |
| |
| out: |
| writeb(I2C_PCF_STOP, bp->i2c_control_regs + 0x0); |
| return ret; |
| } |
| |
| int bbc_i2c_readb(struct bbc_i2c_client *client, unsigned char *byte, int off) |
| { |
| struct bbc_i2c_bus *bp = client->bp; |
| unsigned char address = client->address, status; |
| int ret = -1; |
| |
| if (bp->i2c_bussel_reg != NULL) |
| writeb(client->bus, bp->i2c_bussel_reg); |
| |
| writeb(address, bp->i2c_control_regs + 0x1); |
| writeb(I2C_PCF_START, bp->i2c_control_regs + 0x0); |
| if (wait_for_pin(bp, &status)) |
| goto out; |
| |
| writeb(off, bp->i2c_control_regs + 0x1); |
| if (wait_for_pin(bp, &status) || |
| (status & I2C_PCF_LRB) != 0) |
| goto out; |
| |
| writeb(I2C_PCF_STOP, bp->i2c_control_regs + 0x0); |
| |
| address |= 0x1; /* READ */ |
| |
| writeb(address, bp->i2c_control_regs + 0x1); |
| writeb(I2C_PCF_START, bp->i2c_control_regs + 0x0); |
| if (wait_for_pin(bp, &status)) |
| goto out; |
| |
| /* Set PIN back to one so the device sends the first |
| * byte. |
| */ |
| (void) readb(bp->i2c_control_regs + 0x1); |
| if (wait_for_pin(bp, &status)) |
| goto out; |
| |
| writeb(I2C_PCF_ESO | I2C_PCF_ENI, bp->i2c_control_regs + 0x0); |
| *byte = readb(bp->i2c_control_regs + 0x1); |
| if (wait_for_pin(bp, &status)) |
| goto out; |
| |
| ret = 0; |
| |
| out: |
| writeb(I2C_PCF_STOP, bp->i2c_control_regs + 0x0); |
| (void) readb(bp->i2c_control_regs + 0x1); |
| |
| return ret; |
| } |
| |
| int bbc_i2c_write_buf(struct bbc_i2c_client *client, |
| char *buf, int len, int off) |
| { |
| int ret = 0; |
| |
| while (len > 0) { |
| int err = bbc_i2c_writeb(client, *buf, off); |
| |
| if (err < 0) { |
| ret = err; |
| break; |
| } |
| |
| len--; |
| buf++; |
| off++; |
| } |
| return ret; |
| } |
| |
| int bbc_i2c_read_buf(struct bbc_i2c_client *client, |
| char *buf, int len, int off) |
| { |
| int ret = 0; |
| |
| while (len > 0) { |
| int err = bbc_i2c_readb(client, buf, off); |
| if (err < 0) { |
| ret = err; |
| break; |
| } |
| len--; |
| buf++; |
| off++; |
| } |
| |
| return ret; |
| } |
| |
| EXPORT_SYMBOL(bbc_i2c_getdev); |
| EXPORT_SYMBOL(bbc_i2c_attach); |
| EXPORT_SYMBOL(bbc_i2c_detach); |
| EXPORT_SYMBOL(bbc_i2c_writeb); |
| EXPORT_SYMBOL(bbc_i2c_readb); |
| EXPORT_SYMBOL(bbc_i2c_write_buf); |
| EXPORT_SYMBOL(bbc_i2c_read_buf); |
| |
| static irqreturn_t bbc_i2c_interrupt(int irq, void *dev_id) |
| { |
| struct bbc_i2c_bus *bp = dev_id; |
| |
| /* PIN going from set to clear is the only event which |
| * makes the i2c assert an interrupt. |
| */ |
| if (bp->waiting && |
| !(readb(bp->i2c_control_regs + 0x0) & I2C_PCF_PIN)) |
| wake_up_interruptible(&bp->wq); |
| |
| return IRQ_HANDLED; |
| } |
| |
| static void __init reset_one_i2c(struct bbc_i2c_bus *bp) |
| { |
| writeb(I2C_PCF_PIN, bp->i2c_control_regs + 0x0); |
| writeb(bp->own, bp->i2c_control_regs + 0x1); |
| writeb(I2C_PCF_PIN | I2C_PCF_ES1, bp->i2c_control_regs + 0x0); |
| writeb(bp->clock, bp->i2c_control_regs + 0x1); |
| writeb(I2C_PCF_IDLE, bp->i2c_control_regs + 0x0); |
| } |
| |
| static struct bbc_i2c_bus * __init attach_one_i2c(struct of_device *op, int index) |
| { |
| struct bbc_i2c_bus *bp; |
| struct device_node *dp; |
| int entry; |
| |
| bp = kzalloc(sizeof(*bp), GFP_KERNEL); |
| if (!bp) |
| return NULL; |
| |
| bp->i2c_control_regs = of_ioremap(&op->resource[0], 0, 0x2, "bbc_i2c_regs"); |
| if (!bp->i2c_control_regs) |
| goto fail; |
| |
| bp->i2c_bussel_reg = of_ioremap(&op->resource[1], 0, 0x1, "bbc_i2c_bussel"); |
| if (!bp->i2c_bussel_reg) |
| goto fail; |
| |
| bp->waiting = 0; |
| init_waitqueue_head(&bp->wq); |
| if (request_irq(op->irqs[0], bbc_i2c_interrupt, |
| IRQF_SHARED, "bbc_i2c", bp)) |
| goto fail; |
| |
| bp->index = index; |
| bp->op = op; |
| |
| spin_lock_init(&bp->lock); |
| |
| entry = 0; |
| for (dp = op->node->child; |
| dp && entry < 8; |
| dp = dp->sibling, entry++) { |
| struct of_device *child_op; |
| |
| child_op = of_find_device_by_node(dp); |
| bp->devs[entry].device = child_op; |
| bp->devs[entry].client_claimed = 0; |
| } |
| |
| writeb(I2C_PCF_PIN, bp->i2c_control_regs + 0x0); |
| bp->own = readb(bp->i2c_control_regs + 0x01); |
| writeb(I2C_PCF_PIN | I2C_PCF_ES1, bp->i2c_control_regs + 0x0); |
| bp->clock = readb(bp->i2c_control_regs + 0x01); |
| |
| printk(KERN_INFO "i2c-%d: Regs at %p, %d devices, own %02x, clock %02x.\n", |
| bp->index, bp->i2c_control_regs, entry, bp->own, bp->clock); |
| |
| reset_one_i2c(bp); |
| |
| return bp; |
| |
| fail: |
| if (bp->i2c_bussel_reg) |
| of_iounmap(&op->resource[1], bp->i2c_bussel_reg, 1); |
| if (bp->i2c_control_regs) |
| of_iounmap(&op->resource[0], bp->i2c_control_regs, 2); |
| kfree(bp); |
| return NULL; |
| } |
| |
| extern int bbc_envctrl_init(struct bbc_i2c_bus *bp); |
| extern void bbc_envctrl_cleanup(struct bbc_i2c_bus *bp); |
| |
| static int __devinit bbc_i2c_probe(struct of_device *op, |
| const struct of_device_id *match) |
| { |
| struct bbc_i2c_bus *bp; |
| int err, index = 0; |
| |
| bp = attach_one_i2c(op, index); |
| if (!bp) |
| return -EINVAL; |
| |
| err = bbc_envctrl_init(bp); |
| if (err) { |
| free_irq(op->irqs[0], bp); |
| if (bp->i2c_bussel_reg) |
| of_iounmap(&op->resource[0], bp->i2c_bussel_reg, 1); |
| if (bp->i2c_control_regs) |
| of_iounmap(&op->resource[1], bp->i2c_control_regs, 2); |
| kfree(bp); |
| } else { |
| dev_set_drvdata(&op->dev, bp); |
| } |
| |
| return err; |
| } |
| |
| static int __devexit bbc_i2c_remove(struct of_device *op) |
| { |
| struct bbc_i2c_bus *bp = dev_get_drvdata(&op->dev); |
| |
| bbc_envctrl_cleanup(bp); |
| |
| free_irq(op->irqs[0], bp); |
| |
| if (bp->i2c_bussel_reg) |
| of_iounmap(&op->resource[0], bp->i2c_bussel_reg, 1); |
| if (bp->i2c_control_regs) |
| of_iounmap(&op->resource[1], bp->i2c_control_regs, 2); |
| |
| kfree(bp); |
| |
| return 0; |
| } |
| |
| static const struct of_device_id bbc_i2c_match[] = { |
| { |
| .name = "i2c", |
| .compatible = "SUNW,bbc-i2c", |
| }, |
| {}, |
| }; |
| MODULE_DEVICE_TABLE(of, bbc_i2c_match); |
| |
| static struct of_platform_driver bbc_i2c_driver = { |
| .name = "bbc_i2c", |
| .match_table = bbc_i2c_match, |
| .probe = bbc_i2c_probe, |
| .remove = __devexit_p(bbc_i2c_remove), |
| }; |
| |
| static int __init bbc_i2c_init(void) |
| { |
| return of_register_driver(&bbc_i2c_driver, &of_bus_type); |
| } |
| |
| static void __exit bbc_i2c_exit(void) |
| { |
| of_unregister_driver(&bbc_i2c_driver); |
| } |
| |
| module_init(bbc_i2c_init); |
| module_exit(bbc_i2c_exit); |
| |
| MODULE_LICENSE("GPL"); |