| // SPDX-License-Identifier: GPL-2.0+ |
| /* |
| * TI DaVinci (TMS320DM644x) I2C driver. |
| * |
| * (C) Copyright 2012-2014 |
| * Texas Instruments Incorporated, <www.ti.com> |
| * (C) Copyright 2007 Sergey Kubushyn <ksi@koi8.net> |
| * -------------------------------------------------------- |
| * |
| * NOTE: This driver should be converted to driver model before June 2017. |
| * Please see doc/driver-model/i2c-howto.rst for instructions. |
| */ |
| |
| #include <config.h> |
| #include <i2c.h> |
| #include <dm.h> |
| #include <log.h> |
| #include <asm/arch/hardware.h> |
| #include <asm/arch/i2c_defs.h> |
| #include <asm/io.h> |
| #include <linux/delay.h> |
| #include "davinci_i2c.h" |
| |
| /* Information about i2c controller */ |
| struct i2c_bus { |
| int id; |
| uint speed; |
| struct i2c_regs *regs; |
| }; |
| |
| #define CHECK_NACK() \ |
| do {\ |
| if (tmp & (I2C_TIMEOUT | I2C_STAT_NACK)) {\ |
| REG(&(i2c_base->i2c_con)) = 0;\ |
| return 1;\ |
| } \ |
| } while (0) |
| |
| static int _wait_for_bus(struct i2c_regs *i2c_base) |
| { |
| int stat, timeout; |
| |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| |
| for (timeout = 0; timeout < 10; timeout++) { |
| stat = REG(&(i2c_base->i2c_stat)); |
| if (!((stat) & I2C_STAT_BB)) { |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| return 0; |
| } |
| |
| REG(&(i2c_base->i2c_stat)) = stat; |
| udelay(50000); |
| } |
| |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| return 1; |
| } |
| |
| static int _poll_i2c_irq(struct i2c_regs *i2c_base, int mask) |
| { |
| int stat, timeout; |
| |
| for (timeout = 0; timeout < 10; timeout++) { |
| udelay(1000); |
| stat = REG(&(i2c_base->i2c_stat)); |
| if (stat & mask) |
| return stat; |
| } |
| |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| return stat | I2C_TIMEOUT; |
| } |
| |
| static void _flush_rx(struct i2c_regs *i2c_base) |
| { |
| while (1) { |
| if (!(REG(&(i2c_base->i2c_stat)) & I2C_STAT_RRDY)) |
| break; |
| |
| REG(&(i2c_base->i2c_drr)); |
| REG(&(i2c_base->i2c_stat)) = I2C_STAT_RRDY; |
| udelay(1000); |
| } |
| } |
| |
| static uint _davinci_i2c_setspeed(struct i2c_regs *i2c_base, |
| uint speed) |
| { |
| uint32_t div, psc; |
| |
| psc = 2; |
| /* SCLL + SCLH */ |
| div = (CFG_SYS_HZ_CLOCK / ((psc + 1) * speed)) - 10; |
| REG(&(i2c_base->i2c_psc)) = psc; /* 27MHz / (2 + 1) = 9MHz */ |
| REG(&(i2c_base->i2c_scll)) = (div * 50) / 100; /* 50% Duty */ |
| REG(&(i2c_base->i2c_sclh)) = div - REG(&(i2c_base->i2c_scll)); |
| |
| return 0; |
| } |
| |
| static void _davinci_i2c_init(struct i2c_regs *i2c_base, |
| uint speed, int slaveadd) |
| { |
| if (REG(&(i2c_base->i2c_con)) & I2C_CON_EN) { |
| REG(&(i2c_base->i2c_con)) = 0; |
| udelay(50000); |
| } |
| |
| _davinci_i2c_setspeed(i2c_base, speed); |
| |
| REG(&(i2c_base->i2c_oa)) = slaveadd; |
| REG(&(i2c_base->i2c_cnt)) = 0; |
| |
| /* Interrupts must be enabled or I2C module won't work */ |
| REG(&(i2c_base->i2c_ie)) = I2C_IE_SCD_IE | I2C_IE_XRDY_IE | |
| I2C_IE_RRDY_IE | I2C_IE_ARDY_IE | I2C_IE_NACK_IE; |
| |
| /* Now enable I2C controller (get it out of reset) */ |
| REG(&(i2c_base->i2c_con)) = I2C_CON_EN; |
| |
| udelay(1000); |
| } |
| |
| static int _davinci_i2c_read(struct i2c_regs *i2c_base, uint8_t chip, |
| uint32_t addr, int alen, uint8_t *buf, int len) |
| { |
| uint32_t tmp; |
| int i; |
| |
| if ((alen < 0) || (alen > 2)) { |
| printf("%s(): bogus address length %x\n", __func__, alen); |
| return 1; |
| } |
| |
| if (_wait_for_bus(i2c_base)) |
| return 1; |
| |
| if (alen != 0) { |
| /* Start address phase */ |
| tmp = I2C_CON_EN | I2C_CON_MST | I2C_CON_STT | I2C_CON_TRX; |
| REG(&(i2c_base->i2c_cnt)) = alen; |
| REG(&(i2c_base->i2c_sa)) = chip; |
| REG(&(i2c_base->i2c_con)) = tmp; |
| |
| tmp = _poll_i2c_irq(i2c_base, I2C_STAT_XRDY | I2C_STAT_NACK); |
| |
| CHECK_NACK(); |
| |
| switch (alen) { |
| case 2: |
| /* Send address MSByte */ |
| if (tmp & I2C_STAT_XRDY) { |
| REG(&(i2c_base->i2c_dxr)) = (addr >> 8) & 0xff; |
| } else { |
| REG(&(i2c_base->i2c_con)) = 0; |
| return 1; |
| } |
| |
| tmp = _poll_i2c_irq(i2c_base, |
| I2C_STAT_XRDY | I2C_STAT_NACK); |
| |
| CHECK_NACK(); |
| /* No break, fall through */ |
| case 1: |
| /* Send address LSByte */ |
| if (tmp & I2C_STAT_XRDY) { |
| REG(&(i2c_base->i2c_dxr)) = addr & 0xff; |
| } else { |
| REG(&(i2c_base->i2c_con)) = 0; |
| return 1; |
| } |
| |
| tmp = _poll_i2c_irq(i2c_base, I2C_STAT_XRDY | |
| I2C_STAT_NACK | I2C_STAT_ARDY); |
| |
| CHECK_NACK(); |
| |
| if (!(tmp & I2C_STAT_ARDY)) { |
| REG(&(i2c_base->i2c_con)) = 0; |
| return 1; |
| } |
| } |
| } |
| |
| /* Address phase is over, now read 'len' bytes and stop */ |
| tmp = I2C_CON_EN | I2C_CON_MST | I2C_CON_STT | I2C_CON_STP; |
| REG(&(i2c_base->i2c_cnt)) = len & 0xffff; |
| REG(&(i2c_base->i2c_sa)) = chip; |
| REG(&(i2c_base->i2c_con)) = tmp; |
| |
| for (i = 0; i < len; i++) { |
| tmp = _poll_i2c_irq(i2c_base, I2C_STAT_RRDY | I2C_STAT_NACK | |
| I2C_STAT_ROVR); |
| |
| CHECK_NACK(); |
| |
| if (tmp & I2C_STAT_RRDY) { |
| buf[i] = REG(&(i2c_base->i2c_drr)); |
| } else { |
| REG(&(i2c_base->i2c_con)) = 0; |
| return 1; |
| } |
| } |
| |
| tmp = _poll_i2c_irq(i2c_base, I2C_STAT_SCD | I2C_STAT_NACK); |
| |
| CHECK_NACK(); |
| |
| if (!(tmp & I2C_STAT_SCD)) { |
| REG(&(i2c_base->i2c_con)) = 0; |
| return 1; |
| } |
| |
| _flush_rx(i2c_base); |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| REG(&(i2c_base->i2c_cnt)) = 0; |
| REG(&(i2c_base->i2c_con)) = 0; |
| |
| return 0; |
| } |
| |
| static int _davinci_i2c_write(struct i2c_regs *i2c_base, uint8_t chip, |
| uint32_t addr, int alen, uint8_t *buf, int len) |
| { |
| uint32_t tmp; |
| int i; |
| |
| if ((alen < 0) || (alen > 2)) { |
| printf("%s(): bogus address length %x\n", __func__, alen); |
| return 1; |
| } |
| if (len < 0) { |
| printf("%s(): bogus length %x\n", __func__, len); |
| return 1; |
| } |
| |
| if (_wait_for_bus(i2c_base)) |
| return 1; |
| |
| /* Start address phase */ |
| tmp = I2C_CON_EN | I2C_CON_MST | I2C_CON_STT | |
| I2C_CON_TRX | I2C_CON_STP; |
| REG(&(i2c_base->i2c_cnt)) = (alen == 0) ? |
| len & 0xffff : (len & 0xffff) + alen; |
| REG(&(i2c_base->i2c_sa)) = chip; |
| REG(&(i2c_base->i2c_con)) = tmp; |
| |
| switch (alen) { |
| case 2: |
| /* Send address MSByte */ |
| tmp = _poll_i2c_irq(i2c_base, I2C_STAT_XRDY | I2C_STAT_NACK); |
| |
| CHECK_NACK(); |
| |
| if (tmp & I2C_STAT_XRDY) { |
| REG(&(i2c_base->i2c_dxr)) = (addr >> 8) & 0xff; |
| } else { |
| REG(&(i2c_base->i2c_con)) = 0; |
| return 1; |
| } |
| /* No break, fall through */ |
| case 1: |
| /* Send address LSByte */ |
| tmp = _poll_i2c_irq(i2c_base, I2C_STAT_XRDY | I2C_STAT_NACK); |
| |
| CHECK_NACK(); |
| |
| if (tmp & I2C_STAT_XRDY) { |
| REG(&(i2c_base->i2c_dxr)) = addr & 0xff; |
| } else { |
| REG(&(i2c_base->i2c_con)) = 0; |
| return 1; |
| } |
| } |
| |
| for (i = 0; i < len; i++) { |
| tmp = _poll_i2c_irq(i2c_base, I2C_STAT_XRDY | I2C_STAT_NACK); |
| |
| CHECK_NACK(); |
| |
| if (tmp & I2C_STAT_XRDY) |
| REG(&(i2c_base->i2c_dxr)) = buf[i]; |
| else |
| return 1; |
| } |
| |
| tmp = _poll_i2c_irq(i2c_base, I2C_STAT_SCD | I2C_STAT_NACK); |
| |
| CHECK_NACK(); |
| |
| if (!(tmp & I2C_STAT_SCD)) { |
| REG(&(i2c_base->i2c_con)) = 0; |
| return 1; |
| } |
| |
| _flush_rx(i2c_base); |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| REG(&(i2c_base->i2c_cnt)) = 0; |
| REG(&(i2c_base->i2c_con)) = 0; |
| |
| return 0; |
| } |
| |
| static int _davinci_i2c_probe_chip(struct i2c_regs *i2c_base, uint8_t chip) |
| { |
| int rc = 1; |
| |
| if (chip == REG(&(i2c_base->i2c_oa))) |
| return rc; |
| |
| REG(&(i2c_base->i2c_con)) = 0; |
| if (_wait_for_bus(i2c_base)) |
| return 1; |
| |
| /* try to read one byte from current (or only) address */ |
| REG(&(i2c_base->i2c_cnt)) = 1; |
| REG(&(i2c_base->i2c_sa)) = chip; |
| REG(&(i2c_base->i2c_con)) = (I2C_CON_EN | I2C_CON_MST | I2C_CON_STT | |
| I2C_CON_STP); |
| udelay(50000); |
| |
| if (!(REG(&(i2c_base->i2c_stat)) & I2C_STAT_NACK)) { |
| rc = 0; |
| _flush_rx(i2c_base); |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| } else { |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| REG(&(i2c_base->i2c_con)) |= I2C_CON_STP; |
| udelay(20000); |
| if (_wait_for_bus(i2c_base)) |
| return 1; |
| } |
| |
| _flush_rx(i2c_base); |
| REG(&(i2c_base->i2c_stat)) = 0xffff; |
| REG(&(i2c_base->i2c_cnt)) = 0; |
| return rc; |
| } |
| |
| static int davinci_i2c_xfer(struct udevice *bus, struct i2c_msg *msg, |
| int nmsgs) |
| { |
| struct i2c_bus *i2c_bus = dev_get_priv(bus); |
| int ret; |
| |
| debug("i2c_xfer: %d messages\n", nmsgs); |
| for (; nmsgs > 0; nmsgs--, msg++) { |
| debug("i2c_xfer: chip=0x%x, len=0x%x\n", msg->addr, msg->len); |
| if (msg->flags & I2C_M_RD) { |
| ret = _davinci_i2c_read(i2c_bus->regs, msg->addr, |
| 0, 0, msg->buf, msg->len); |
| } else { |
| ret = _davinci_i2c_write(i2c_bus->regs, msg->addr, |
| 0, 0, msg->buf, msg->len); |
| } |
| if (ret) { |
| debug("i2c_write: error sending\n"); |
| return -EREMOTEIO; |
| } |
| } |
| |
| return ret; |
| } |
| |
| static int davinci_i2c_set_speed(struct udevice *dev, uint speed) |
| { |
| struct i2c_bus *i2c_bus = dev_get_priv(dev); |
| |
| i2c_bus->speed = speed; |
| return _davinci_i2c_setspeed(i2c_bus->regs, speed); |
| } |
| |
| static int davinci_i2c_probe(struct udevice *dev) |
| { |
| struct i2c_bus *i2c_bus = dev_get_priv(dev); |
| |
| i2c_bus->id = dev_seq(dev); |
| i2c_bus->regs = dev_read_addr_ptr(dev); |
| |
| i2c_bus->speed = 100000; |
| _davinci_i2c_init(i2c_bus->regs, i2c_bus->speed, 0); |
| |
| return 0; |
| } |
| |
| static int davinci_i2c_probe_chip(struct udevice *bus, uint chip_addr, |
| uint chip_flags) |
| { |
| struct i2c_bus *i2c_bus = dev_get_priv(bus); |
| |
| return _davinci_i2c_probe_chip(i2c_bus->regs, chip_addr); |
| } |
| |
| static const struct dm_i2c_ops davinci_i2c_ops = { |
| .xfer = davinci_i2c_xfer, |
| .probe_chip = davinci_i2c_probe_chip, |
| .set_bus_speed = davinci_i2c_set_speed, |
| }; |
| |
| static const struct udevice_id davinci_i2c_ids[] = { |
| { .compatible = "ti,davinci-i2c"}, |
| { .compatible = "ti,keystone-i2c"}, |
| { } |
| }; |
| |
| U_BOOT_DRIVER(i2c_davinci) = { |
| .name = "i2c_davinci", |
| .id = UCLASS_I2C, |
| .of_match = davinci_i2c_ids, |
| .probe = davinci_i2c_probe, |
| .priv_auto = sizeof(struct i2c_bus), |
| .ops = &davinci_i2c_ops, |
| }; |