[net-next-2.6.git] / drivers / i2c / busses / i2c-cpm.c

/*
 * Freescale CPM1/CPM2 I2C interface.
 * Copyright (c) 1999 Dan Malek (dmalek@jlc.net).
 *
 * moved into proper i2c interface;
 * Brad Parker (brad@heeltoe.com)
 *
 * Parts from dbox2_i2c.c (cvs.tuxbox.org)
 * (C) 2000-2001 Felix Domke (tmbinc@gmx.net), Gillem (htoa@gmx.net)
 *
 * (C) 2007 Montavista Software, Inc.
 * Vitaly Bordug <vitb@kernel.crashing.org>
 *
 * Converted to of_platform_device. Renamed to i2c-cpm.c.
 * (C) 2007,2008 Jochen Friedrich <jochen@scram.de>
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/delay.h>
#include <linux/slab.h>
#include <linux/init.h>
#include <linux/interrupt.h>
#include <linux/errno.h>
#include <linux/stddef.h>
#include <linux/i2c.h>
#include <linux/io.h>
#include <linux/dma-mapping.h>
#include <linux/of_device.h>
#include <linux/of_platform.h>
#include <linux/of_i2c.h>
#include <sysdev/fsl_soc.h>
#include <asm/cpm.h>

/* Try to define this if you have an older CPU (earlier than rev D4) */
/* However, better use a GPIO based bitbang driver in this case :/   */
#undef	I2C_CHIP_ERRATA

#define CPM_MAX_READ    513
#define CPM_MAXBD       4

#define I2C_EB			(0x10) /* Big endian mode */
#define I2C_EB_CPM2		(0x30) /* Big endian mode, memory snoop */

#define DPRAM_BASE		((u8 __iomem __force *)cpm_muram_addr(0))

/* I2C parameter RAM. */
struct i2c_ram {
	ushort  rbase;		/* Rx Buffer descriptor base address */
	ushort  tbase;		/* Tx Buffer descriptor base address */
	u_char  rfcr;		/* Rx function code */
	u_char  tfcr;		/* Tx function code */
	ushort  mrblr;		/* Max receive buffer length */
	uint    rstate;		/* Internal */
	uint    rdp;		/* Internal */
	ushort  rbptr;		/* Rx Buffer descriptor pointer */
	ushort  rbc;		/* Internal */
	uint    rxtmp;		/* Internal */
	uint    tstate;		/* Internal */
	uint    tdp;		/* Internal */
	ushort  tbptr;		/* Tx Buffer descriptor pointer */
	ushort  tbc;		/* Internal */
	uint    txtmp;		/* Internal */
	char    res1[4];	/* Reserved */
	ushort  rpbase;		/* Relocation pointer */
	char    res2[2];	/* Reserved */
};

#define I2COM_START	0x80
#define I2COM_MASTER	0x01
#define I2CER_TXE	0x10
#define I2CER_BUSY	0x04
#define I2CER_TXB	0x02
#define I2CER_RXB	0x01
#define I2MOD_EN	0x01

/* I2C Registers */
struct i2c_reg {
	u8	i2mod;
	u8	res1[3];
	u8	i2add;
	u8	res2[3];
	u8	i2brg;
	u8	res3[3];
	u8	i2com;
	u8	res4[3];
	u8	i2cer;
	u8	res5[3];
	u8	i2cmr;
};

struct cpm_i2c {
	char *base;
	struct platform_device *ofdev;
	struct i2c_adapter adap;
	uint dp_addr;
	int version; /* CPM1=1, CPM2=2 */
	int irq;
	int cp_command;
	int freq;
	struct i2c_reg __iomem *i2c_reg;
	struct i2c_ram __iomem *i2c_ram;
	u16 i2c_addr;
	wait_queue_head_t i2c_wait;
	cbd_t __iomem *tbase;
	cbd_t __iomem *rbase;
	u_char *txbuf[CPM_MAXBD];
	u_char *rxbuf[CPM_MAXBD];
	u32 txdma[CPM_MAXBD];
	u32 rxdma[CPM_MAXBD];
};

static irqreturn_t cpm_i2c_interrupt(int irq, void *dev_id)
{
	struct cpm_i2c *cpm;
	struct i2c_reg __iomem *i2c_reg;
	struct i2c_adapter *adap = dev_id;
	int i;

	cpm = i2c_get_adapdata(dev_id);
	i2c_reg = cpm->i2c_reg;

	/* Clear interrupt. */
	i = in_8(&i2c_reg->i2cer);
	out_8(&i2c_reg->i2cer, i);

	dev_dbg(&adap->dev, "Interrupt: %x\n", i);

	wake_up(&cpm->i2c_wait);

	return i ? IRQ_HANDLED : IRQ_NONE;
}

static void cpm_reset_i2c_params(struct cpm_i2c *cpm)
{
	struct i2c_ram __iomem *i2c_ram = cpm->i2c_ram;

	/* Set up the I2C parameters in the parameter ram. */
	out_be16(&i2c_ram->tbase, (u8 __iomem *)cpm->tbase - DPRAM_BASE);
	out_be16(&i2c_ram->rbase, (u8 __iomem *)cpm->rbase - DPRAM_BASE);

	if (cpm->version == 1) {
		out_8(&i2c_ram->tfcr, I2C_EB);
		out_8(&i2c_ram->rfcr, I2C_EB);
	} else {
		out_8(&i2c_ram->tfcr, I2C_EB_CPM2);
		out_8(&i2c_ram->rfcr, I2C_EB_CPM2);
	}

	out_be16(&i2c_ram->mrblr, CPM_MAX_READ);

	out_be32(&i2c_ram->rstate, 0);
	out_be32(&i2c_ram->rdp, 0);
	out_be16(&i2c_ram->rbptr, 0);
	out_be16(&i2c_ram->rbc, 0);
	out_be32(&i2c_ram->rxtmp, 0);
	out_be32(&i2c_ram->tstate, 0);
	out_be32(&i2c_ram->tdp, 0);
	out_be16(&i2c_ram->tbptr, 0);
	out_be16(&i2c_ram->tbc, 0);
	out_be32(&i2c_ram->txtmp, 0);
}

static void cpm_i2c_force_close(struct i2c_adapter *adap)
{
	struct cpm_i2c *cpm = i2c_get_adapdata(adap);
	struct i2c_reg __iomem *i2c_reg = cpm->i2c_reg;

	dev_dbg(&adap->dev, "cpm_i2c_force_close()\n");

	cpm_command(cpm->cp_command, CPM_CR_CLOSE_RX_BD);

	out_8(&i2c_reg->i2cmr, 0x00);	/* Disable all interrupts */
	out_8(&i2c_reg->i2cer, 0xff);
}

static void cpm_i2c_parse_message(struct i2c_adapter *adap,
	struct i2c_msg *pmsg, int num, int tx, int rx)
{
	cbd_t __iomem *tbdf;
	cbd_t __iomem *rbdf;
	u_char addr;
	u_char *tb;
	u_char *rb;
	struct cpm_i2c *cpm = i2c_get_adapdata(adap);

	tbdf = cpm->tbase + tx;
	rbdf = cpm->rbase + rx;

	addr = pmsg->addr << 1;
	if (pmsg->flags & I2C_M_RD)
		addr |= 1;

	tb = cpm->txbuf[tx];
	rb = cpm->rxbuf[rx];

	/* Align read buffer */
	rb = (u_char *) (((ulong) rb + 1) & ~1);

	tb[0] = addr;		/* Device address byte w/rw flag */

	out_be16(&tbdf->cbd_datlen, pmsg->len + 1);
	out_be16(&tbdf->cbd_sc, 0);

	if (!(pmsg->flags & I2C_M_NOSTART))
		setbits16(&tbdf->cbd_sc, BD_I2C_START);

	if (tx + 1 == num)
		setbits16(&tbdf->cbd_sc, BD_SC_LAST | BD_SC_WRAP);

	if (pmsg->flags & I2C_M_RD) {
		/*
		 * To read, we need an empty buffer of the proper length.
		 * All that is used is the first byte for address, the remainder
		 * is just used for timing (and doesn't really have to exist).
		 */

		dev_dbg(&adap->dev, "cpm_i2c_read(abyte=0x%x)\n", addr);

		out_be16(&rbdf->cbd_datlen, 0);
		out_be16(&rbdf->cbd_sc, BD_SC_EMPTY | BD_SC_INTRPT);

		if (rx + 1 == CPM_MAXBD)
			setbits16(&rbdf->cbd_sc, BD_SC_WRAP);

		eieio();
		setbits16(&tbdf->cbd_sc, BD_SC_READY);
	} else {
		dev_dbg(&adap->dev, "cpm_i2c_write(abyte=0x%x)\n", addr);

		memcpy(tb+1, pmsg->buf, pmsg->len);

		eieio();
		setbits16(&tbdf->cbd_sc, BD_SC_READY | BD_SC_INTRPT);
	}
}

static int cpm_i2c_check_message(struct i2c_adapter *adap,
	struct i2c_msg *pmsg, int tx, int rx)
{
	cbd_t __iomem *tbdf;
	cbd_t __iomem *rbdf;
	u_char *tb;
	u_char *rb;
	struct cpm_i2c *cpm = i2c_get_adapdata(adap);

	tbdf = cpm->tbase + tx;
	rbdf = cpm->rbase + rx;

	tb = cpm->txbuf[tx];
	rb = cpm->rxbuf[rx];

	/* Align read buffer */
	rb = (u_char *) (((uint) rb + 1) & ~1);

	eieio();
	if (pmsg->flags & I2C_M_RD) {
		dev_dbg(&adap->dev, "tx sc 0x%04x, rx sc 0x%04x\n",
			in_be16(&tbdf->cbd_sc), in_be16(&rbdf->cbd_sc));

		if (in_be16(&tbdf->cbd_sc) & BD_SC_NAK) {
			dev_dbg(&adap->dev, "I2C read; No ack\n");
			return -ENXIO;
		}
		if (in_be16(&rbdf->cbd_sc) & BD_SC_EMPTY) {
			dev_err(&adap->dev,
				"I2C read; complete but rbuf empty\n");
			return -EREMOTEIO;
		}
		if (in_be16(&rbdf->cbd_sc) & BD_SC_OV) {
			dev_err(&adap->dev, "I2C read; Overrun\n");
			return -EREMOTEIO;
		}
		memcpy(pmsg->buf, rb, pmsg->len);
	} else {
		dev_dbg(&adap->dev, "tx sc %d 0x%04x\n", tx,
			in_be16(&tbdf->cbd_sc));

		if (in_be16(&tbdf->cbd_sc) & BD_SC_NAK) {
			dev_dbg(&adap->dev, "I2C write; No ack\n");
			return -ENXIO;
		}
		if (in_be16(&tbdf->cbd_sc) & BD_SC_UN) {
			dev_err(&adap->dev, "I2C write; Underrun\n");
			return -EIO;
		}
		if (in_be16(&tbdf->cbd_sc) & BD_SC_CL) {
			dev_err(&adap->dev, "I2C write; Collision\n");
			return -EIO;
		}
	}
	return 0;
}

static int cpm_i2c_xfer(struct i2c_adapter *adap, struct i2c_msg *msgs, int num)
{
	struct cpm_i2c *cpm = i2c_get_adapdata(adap);
	struct i2c_reg __iomem *i2c_reg = cpm->i2c_reg;
	struct i2c_ram __iomem *i2c_ram = cpm->i2c_ram;
	struct i2c_msg *pmsg;
	int ret, i;
	int tptr;
	int rptr;
	cbd_t __iomem *tbdf;
	cbd_t __iomem *rbdf;

	if (num > CPM_MAXBD)
		return -EINVAL;

	/* Check if we have any oversized READ requests */
	for (i = 0; i < num; i++) {
		pmsg = &msgs[i];
		if (pmsg->len >= CPM_MAX_READ)
			return -EINVAL;
	}

	/* Reset to use first buffer */
	out_be16(&i2c_ram->rbptr, in_be16(&i2c_ram->rbase));
	out_be16(&i2c_ram->tbptr, in_be16(&i2c_ram->tbase));

	tbdf = cpm->tbase;
	rbdf = cpm->rbase;

	tptr = 0;
	rptr = 0;

	while (tptr < num) {
		pmsg = &msgs[tptr];
		dev_dbg(&adap->dev, "R: %d T: %d\n", rptr, tptr);

		cpm_i2c_parse_message(adap, pmsg, num, tptr, rptr);
		if (pmsg->flags & I2C_M_RD)
			rptr++;
		tptr++;
	}
	/* Start transfer now */
	/* Enable RX/TX/Error interupts */
	out_8(&i2c_reg->i2cmr, I2CER_TXE | I2CER_TXB | I2CER_RXB);
	out_8(&i2c_reg->i2cer, 0xff);	/* Clear interrupt status */
	/* Chip bug, set enable here */
	setbits8(&i2c_reg->i2mod, I2MOD_EN);	/* Enable */
	/* Begin transmission */
	setbits8(&i2c_reg->i2com, I2COM_START);

	tptr = 0;
	rptr = 0;

	while (tptr < num) {
		/* Check for outstanding messages */
		dev_dbg(&adap->dev, "test ready.\n");
		pmsg = &msgs[tptr];
		if (pmsg->flags & I2C_M_RD)
			ret = wait_event_timeout(cpm->i2c_wait,
				(in_be16(&tbdf[tptr].cbd_sc) & BD_SC_NAK) ||
				!(in_be16(&rbdf[rptr].cbd_sc) & BD_SC_EMPTY),
				1 * HZ);
		else
			ret = wait_event_timeout(cpm->i2c_wait,
				!(in_be16(&tbdf[tptr].cbd_sc) & BD_SC_READY),
				1 * HZ);
		if (ret == 0) {
			ret = -EREMOTEIO;
			dev_err(&adap->dev, "I2C transfer: timeout\n");
			goto out_err;
		}
		if (ret > 0) {
			dev_dbg(&adap->dev, "ready.\n");
			ret = cpm_i2c_check_message(adap, pmsg, tptr, rptr);
			tptr++;
			if (pmsg->flags & I2C_M_RD)
				rptr++;
			if (ret)
				goto out_err;
		}
	}
#ifdef I2C_CHIP_ERRATA
	/*
	 * Chip errata, clear enable. This is not needed on rev D4 CPUs.
	 * Disabling I2C too early may cause too short stop condition
	 */
	udelay(4);
	clrbits8(&i2c_reg->i2mod, I2MOD_EN);
#endif
	return (num);

out_err:
	cpm_i2c_force_close(adap);
#ifdef I2C_CHIP_ERRATA
	/*
	 * Chip errata, clear enable. This is not needed on rev D4 CPUs.
	 */
	clrbits8(&i2c_reg->i2mod, I2MOD_EN);
#endif
	return ret;
}

static u32 cpm_i2c_func(struct i2c_adapter *adap)
{
	return I2C_FUNC_I2C | (I2C_FUNC_SMBUS_EMUL & ~I2C_FUNC_SMBUS_QUICK);
}

/* -----exported algorithm data: -------------------------------------	*/

static const struct i2c_algorithm cpm_i2c_algo = {
	.master_xfer = cpm_i2c_xfer,
	.functionality = cpm_i2c_func,
};

static const struct i2c_adapter cpm_ops = {
	.owner		= THIS_MODULE,
	.name		= "i2c-cpm",
	.algo		= &cpm_i2c_algo,
};

static int __devinit cpm_i2c_setup(struct cpm_i2c *cpm)
{
	struct platform_device *ofdev = cpm->ofdev;
	const u32 *data;
	int len, ret, i;
	void __iomem *i2c_base;
	cbd_t __iomem *tbdf;
	cbd_t __iomem *rbdf;
	unsigned char brg;

	dev_dbg(&cpm->ofdev->dev, "cpm_i2c_setup()\n");

	init_waitqueue_head(&cpm->i2c_wait);

	cpm->irq = of_irq_to_resource(ofdev->dev.of_node, 0, NULL);
	if (!cpm->irq)
		return -EINVAL;

	/* Install interrupt handler. */
	ret = request_irq(cpm->irq, cpm_i2c_interrupt, 0, "cpm_i2c",
			  &cpm->adap);
	if (ret)
		return ret;

	/* I2C parameter RAM */
	i2c_base = of_iomap(ofdev->dev.of_node, 1);
	if (i2c_base == NULL) {
		ret = -EINVAL;
		goto out_irq;
	}

	if (of_device_is_compatible(ofdev->dev.of_node, "fsl,cpm1-i2c")) {

		/* Check for and use a microcode relocation patch. */
		cpm->i2c_ram = i2c_base;
		cpm->i2c_addr = in_be16(&cpm->i2c_ram->rpbase);

		/*
		 * Maybe should use cpm_muram_alloc instead of hardcoding
		 * this in micropatch.c
		 */
		if (cpm->i2c_addr) {
			cpm->i2c_ram = cpm_muram_addr(cpm->i2c_addr);
			iounmap(i2c_base);
		}

		cpm->version = 1;

	} else if (of_device_is_compatible(ofdev->dev.of_node, "fsl,cpm2-i2c")) {
		cpm->i2c_addr = cpm_muram_alloc(sizeof(struct i2c_ram), 64);
		cpm->i2c_ram = cpm_muram_addr(cpm->i2c_addr);
		out_be16(i2c_base, cpm->i2c_addr);
		iounmap(i2c_base);

		cpm->version = 2;

	} else {
		iounmap(i2c_base);
		ret = -EINVAL;
		goto out_irq;
	}

	/* I2C control/status registers */
	cpm->i2c_reg = of_iomap(ofdev->dev.of_node, 0);
	if (cpm->i2c_reg == NULL) {
		ret = -EINVAL;
		goto out_ram;
	}

	data = of_get_property(ofdev->dev.of_node, "fsl,cpm-command", &len);
	if (!data || len != 4) {
		ret = -EINVAL;
		goto out_reg;
	}
	cpm->cp_command = *data;

	data = of_get_property(ofdev->dev.of_node, "linux,i2c-class", &len);
	if (data && len == 4)
		cpm->adap.class = *data;

	data = of_get_property(ofdev->dev.of_node, "clock-frequency", &len);
	if (data && len == 4)
		cpm->freq = *data;
	else
		cpm->freq = 60000; /* use 60kHz i2c clock by default */

	/*
	 * Allocate space for CPM_MAXBD transmit and receive buffer
	 * descriptors in the DP ram.
	 */
	cpm->dp_addr = cpm_muram_alloc(sizeof(cbd_t) * 2 * CPM_MAXBD, 8);
	if (!cpm->dp_addr) {
		ret = -ENOMEM;
		goto out_reg;
	}

	cpm->tbase = cpm_muram_addr(cpm->dp_addr);
	cpm->rbase = cpm_muram_addr(cpm->dp_addr + sizeof(cbd_t) * CPM_MAXBD);

	/* Allocate TX and RX buffers */

	tbdf = cpm->tbase;
	rbdf = cpm->rbase;

	for (i = 0; i < CPM_MAXBD; i++) {
		cpm->rxbuf[i] = dma_alloc_coherent(&cpm->ofdev->dev,
						   CPM_MAX_READ + 1,
						   &cpm->rxdma[i], GFP_KERNEL);
		if (!cpm->rxbuf[i]) {
			ret = -ENOMEM;
			goto out_muram;
		}
		out_be32(&rbdf[i].cbd_bufaddr, ((cpm->rxdma[i] + 1) & ~1));

		cpm->txbuf[i] = (unsigned char *)dma_alloc_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1, &cpm->txdma[i], GFP_KERNEL);
		if (!cpm->txbuf[i]) {
			ret = -ENOMEM;
			goto out_muram;
		}
		out_be32(&tbdf[i].cbd_bufaddr, cpm->txdma[i]);
	}

	/* Initialize Tx/Rx parameters. */

	cpm_reset_i2c_params(cpm);

	dev_dbg(&cpm->ofdev->dev, "i2c_ram 0x%p, i2c_addr 0x%04x, freq %d\n",
		cpm->i2c_ram, cpm->i2c_addr, cpm->freq);
	dev_dbg(&cpm->ofdev->dev, "tbase 0x%04x, rbase 0x%04x\n",
		(u8 __iomem *)cpm->tbase - DPRAM_BASE,
		(u8 __iomem *)cpm->rbase - DPRAM_BASE);

	cpm_command(cpm->cp_command, CPM_CR_INIT_TRX);

	/*
	 * Select an invalid address. Just make sure we don't use loopback mode
	 */
	out_8(&cpm->i2c_reg->i2add, 0x7f << 1);

	/*
	 * PDIV is set to 00 in i2mod, so brgclk/32 is used as input to the
	 * i2c baud rate generator. This is divided by 2 x (DIV + 3) to get
	 * the actual i2c bus frequency.
	 */
	brg = get_brgfreq() / (32 * 2 * cpm->freq) - 3;
	out_8(&cpm->i2c_reg->i2brg, brg);

	out_8(&cpm->i2c_reg->i2mod, 0x00);
	out_8(&cpm->i2c_reg->i2com, I2COM_MASTER);	/* Master mode */

	/* Disable interrupts. */
	out_8(&cpm->i2c_reg->i2cmr, 0);
	out_8(&cpm->i2c_reg->i2cer, 0xff);

	return 0;

out_muram:
	for (i = 0; i < CPM_MAXBD; i++) {
		if (cpm->rxbuf[i])
			dma_free_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1,
				cpm->rxbuf[i], cpm->rxdma[i]);
		if (cpm->txbuf[i])
			dma_free_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1,
				cpm->txbuf[i], cpm->txdma[i]);
	}
	cpm_muram_free(cpm->dp_addr);
out_reg:
	iounmap(cpm->i2c_reg);
out_ram:
	if ((cpm->version == 1) && (!cpm->i2c_addr))
		iounmap(cpm->i2c_ram);
	if (cpm->version == 2)
		cpm_muram_free(cpm->i2c_addr);
out_irq:
	free_irq(cpm->irq, &cpm->adap);
	return ret;
}

static void cpm_i2c_shutdown(struct cpm_i2c *cpm)
{
	int i;

	/* Shut down I2C. */
	clrbits8(&cpm->i2c_reg->i2mod, I2MOD_EN);

	/* Disable interrupts */
	out_8(&cpm->i2c_reg->i2cmr, 0);
	out_8(&cpm->i2c_reg->i2cer, 0xff);

	free_irq(cpm->irq, &cpm->adap);

	/* Free all memory */
	for (i = 0; i < CPM_MAXBD; i++) {
		dma_free_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1,
			cpm->rxbuf[i], cpm->rxdma[i]);
		dma_free_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1,
			cpm->txbuf[i], cpm->txdma[i]);
	}

	cpm_muram_free(cpm->dp_addr);
	iounmap(cpm->i2c_reg);

	if ((cpm->version == 1) && (!cpm->i2c_addr))
		iounmap(cpm->i2c_ram);
	if (cpm->version == 2)
		cpm_muram_free(cpm->i2c_addr);
}

static int __devinit cpm_i2c_probe(struct platform_device *ofdev,
			 const struct of_device_id *match)
{
	int result, len;
	struct cpm_i2c *cpm;
	const u32 *data;

	cpm = kzalloc(sizeof(struct cpm_i2c), GFP_KERNEL);
	if (!cpm)
		return -ENOMEM;

	cpm->ofdev = ofdev;

	dev_set_drvdata(&ofdev->dev, cpm);

	cpm->adap = cpm_ops;
	i2c_set_adapdata(&cpm->adap, cpm);
	cpm->adap.dev.parent = &ofdev->dev;
	cpm->adap.dev.of_node = of_node_get(ofdev->dev.of_node);

	result = cpm_i2c_setup(cpm);
	if (result) {
		dev_err(&ofdev->dev, "Unable to init hardware\n");
		goto out_free;
	}

	/* register new adapter to i2c module... */

	data = of_get_property(ofdev->dev.of_node, "linux,i2c-index", &len);
	if (data && len == 4) {
		cpm->adap.nr = *data;
		result = i2c_add_numbered_adapter(&cpm->adap);
	} else
		result = i2c_add_adapter(&cpm->adap);

	if (result < 0) {
		dev_err(&ofdev->dev, "Unable to register with I2C\n");
		goto out_shut;
	}

	dev_dbg(&ofdev->dev, "hw routines for %s registered.\n",
		cpm->adap.name);

	/*
	 * register OF I2C devices
	 */
	of_i2c_register_devices(&cpm->adap);

	return 0;
out_shut:
	cpm_i2c_shutdown(cpm);
out_free:
	dev_set_drvdata(&ofdev->dev, NULL);
	kfree(cpm);

	return result;
}

static int __devexit cpm_i2c_remove(struct platform_device *ofdev)
{
	struct cpm_i2c *cpm = dev_get_drvdata(&ofdev->dev);

	i2c_del_adapter(&cpm->adap);

	cpm_i2c_shutdown(cpm);

	dev_set_drvdata(&ofdev->dev, NULL);
	kfree(cpm);

	return 0;
}

static const struct of_device_id cpm_i2c_match[] = {
	{
		.compatible = "fsl,cpm1-i2c",
	},
	{
		.compatible = "fsl,cpm2-i2c",
	},
	{},
};

MODULE_DEVICE_TABLE(of, cpm_i2c_match);

static struct of_platform_driver cpm_i2c_driver = {
	.probe		= cpm_i2c_probe,
	.remove		= __devexit_p(cpm_i2c_remove),
	.driver = {
		.name = "fsl-i2c-cpm",
		.owner = THIS_MODULE,
		.of_match_table = cpm_i2c_match,
	},
};

static int __init cpm_i2c_init(void)
{
	return of_register_platform_driver(&cpm_i2c_driver);
}

static void __exit cpm_i2c_exit(void)
{
	of_unregister_platform_driver(&cpm_i2c_driver);
}

module_init(cpm_i2c_init);
module_exit(cpm_i2c_exit);

MODULE_AUTHOR("Jochen Friedrich <jochen@scram.de>");
MODULE_DESCRIPTION("I2C-Bus adapter routines for CPM boards");
MODULE_LICENSE("GPL");
Commit	Line	Data
61045dbe JF	1	/*
	2	* Freescale CPM1/CPM2 I2C interface.
	3	* Copyright (c) 1999 Dan Malek (dmalek@jlc.net).
	4	*
	5	* moved into proper i2c interface;
	6	* Brad Parker (brad@heeltoe.com)
	7	*
	8	* Parts from dbox2_i2c.c (cvs.tuxbox.org)
	9	* (C) 2000-2001 Felix Domke (tmbinc@gmx.net), Gillem (htoa@gmx.net)
	10	*
	11	* (C) 2007 Montavista Software, Inc.
	12	* Vitaly Bordug <vitb@kernel.crashing.org>
	13	*
	14	* Converted to of_platform_device. Renamed to i2c-cpm.c.
	15	* (C) 2007,2008 Jochen Friedrich <jochen@scram.de>
	16	*
	17	* This program is free software; you can redistribute it and/or modify
	18	* it under the terms of the GNU General Public License as published by
	19	* the Free Software Foundation; either version 2 of the License, or
	20	* (at your option) any later version.
	21	*
	22	* This program is distributed in the hope that it will be useful,
	23	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	24	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	25	* GNU General Public License for more details.
	26	*
	27	* You should have received a copy of the GNU General Public License
	28	* along with this program; if not, write to the Free Software
	29	* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
	30	*/
	31
	32	#include <linux/kernel.h>
	33	#include <linux/module.h>
	34	#include <linux/delay.h>
	35	#include <linux/slab.h>
	36	#include <linux/init.h>
	37	#include <linux/interrupt.h>
	38	#include <linux/errno.h>
	39	#include <linux/stddef.h>
	40	#include <linux/i2c.h>
	41	#include <linux/io.h>
	42	#include <linux/dma-mapping.h>
	43	#include <linux/of_device.h>
	44	#include <linux/of_platform.h>
	45	#include <linux/of_i2c.h>
	46	#include <sysdev/fsl_soc.h>
	47	#include <asm/cpm.h>
	48
	49	/* Try to define this if you have an older CPU (earlier than rev D4) */
	50	/* However, better use a GPIO based bitbang driver in this case :/ */
	51	#undef I2C_CHIP_ERRATA
	52
	53	#define CPM_MAX_READ 513
	54	#define CPM_MAXBD 4
	55
	56	#define I2C_EB (0x10) /* Big endian mode */
	57	#define I2C_EB_CPM2 (0x30) /* Big endian mode, memory snoop */
	58
	59	#define DPRAM_BASE ((u8 __iomem __force *)cpm_muram_addr(0))
	60
	61	/* I2C parameter RAM. */
	62	struct i2c_ram {
	63	ushort rbase; /* Rx Buffer descriptor base address */
	64	ushort tbase; /* Tx Buffer descriptor base address */
65	u_char rfcr; /* Rx function code */
66	u_char tfcr; /* Tx function code */
67	ushort mrblr; /* Max receive buffer length */
68	uint rstate; /* Internal */
69	uint rdp; /* Internal */
70	ushort rbptr; /* Rx Buffer descriptor pointer */
71	ushort rbc; /* Internal */
72	uint rxtmp; /* Internal */
73	uint tstate; /* Internal */
74	uint tdp; /* Internal */
75	ushort tbptr; /* Tx Buffer descriptor pointer */
76	ushort tbc; /* Internal */
77	uint txtmp; /* Internal */
78	char res1[4]; /* Reserved */
79	ushort rpbase; /* Relocation pointer */
80	char res2[2]; /* Reserved */
81	};
82
83	#define I2COM_START 0x80
84	#define I2COM_MASTER 0x01
85	#define I2CER_TXE 0x10
86	#define I2CER_BUSY 0x04
87	#define I2CER_TXB 0x02
88	#define I2CER_RXB 0x01
89	#define I2MOD_EN 0x01
90
91	/* I2C Registers */
92	struct i2c_reg {
93	u8 i2mod;
94	u8 res1[3];
95	u8 i2add;
96	u8 res2[3];
97	u8 i2brg;
98	u8 res3[3];
99	u8 i2com;
100	u8 res4[3];
101	u8 i2cer;
102	u8 res5[3];
103	u8 i2cmr;
104	};
105
106	struct cpm_i2c {
107	char *base;
2dc11581	108	struct platform_device *ofdev;
61045dbe JF	109	struct i2c_adapter adap;
	110	uint dp_addr;
	111	int version; /* CPM1=1, CPM2=2 */
	112	int irq;
	113	int cp_command;
	114	int freq;
	115	struct i2c_reg __iomem *i2c_reg;
	116	struct i2c_ram __iomem *i2c_ram;
	117	u16 i2c_addr;
	118	wait_queue_head_t i2c_wait;
	119	cbd_t __iomem *tbase;
	120	cbd_t __iomem *rbase;
	121	u_char *txbuf[CPM_MAXBD];
	122	u_char *rxbuf[CPM_MAXBD];
	123	u32 txdma[CPM_MAXBD];
	124	u32 rxdma[CPM_MAXBD];
	125	};
	126
	127	static irqreturn_t cpm_i2c_interrupt(int irq, void *dev_id)
	128	{
	129	struct cpm_i2c *cpm;
	130	struct i2c_reg __iomem *i2c_reg;
	131	struct i2c_adapter *adap = dev_id;
	132	int i;
	133
	134	cpm = i2c_get_adapdata(dev_id);
	135	i2c_reg = cpm->i2c_reg;
	136
	137	/* Clear interrupt. */
	138	i = in_8(&i2c_reg->i2cer);
	139	out_8(&i2c_reg->i2cer, i);
	140
	141	dev_dbg(&adap->dev, "Interrupt: %x\n", i);
	142
dc1972d0	143	wake_up(&cpm->i2c_wait);
61045dbe JF	144
	145	return i ? IRQ_HANDLED : IRQ_NONE;
	146	}
	147
	148	static void cpm_reset_i2c_params(struct cpm_i2c *cpm)
	149	{
	150	struct i2c_ram __iomem *i2c_ram = cpm->i2c_ram;
	151
	152	/* Set up the I2C parameters in the parameter ram. */
	153	out_be16(&i2c_ram->tbase, (u8 __iomem *)cpm->tbase - DPRAM_BASE);
	154	out_be16(&i2c_ram->rbase, (u8 __iomem *)cpm->rbase - DPRAM_BASE);
	155
	156	if (cpm->version == 1) {
	157	out_8(&i2c_ram->tfcr, I2C_EB);
	158	out_8(&i2c_ram->rfcr, I2C_EB);
	159	} else {
	160	out_8(&i2c_ram->tfcr, I2C_EB_CPM2);
	161	out_8(&i2c_ram->rfcr, I2C_EB_CPM2);
	162	}
	163
	164	out_be16(&i2c_ram->mrblr, CPM_MAX_READ);
	165
	166	out_be32(&i2c_ram->rstate, 0);
	167	out_be32(&i2c_ram->rdp, 0);
	168	out_be16(&i2c_ram->rbptr, 0);
	169	out_be16(&i2c_ram->rbc, 0);
	170	out_be32(&i2c_ram->rxtmp, 0);
	171	out_be32(&i2c_ram->tstate, 0);
	172	out_be32(&i2c_ram->tdp, 0);
	173	out_be16(&i2c_ram->tbptr, 0);
	174	out_be16(&i2c_ram->tbc, 0);
	175	out_be32(&i2c_ram->txtmp, 0);
	176	}
	177
	178	static void cpm_i2c_force_close(struct i2c_adapter *adap)
	179	{
	180	struct cpm_i2c *cpm = i2c_get_adapdata(adap);
	181	struct i2c_reg __iomem *i2c_reg = cpm->i2c_reg;
	182
	183	dev_dbg(&adap->dev, "cpm_i2c_force_close()\n");
	184
	185	cpm_command(cpm->cp_command, CPM_CR_CLOSE_RX_BD);
	186
	187	out_8(&i2c_reg->i2cmr, 0x00); /* Disable all interrupts */
	188	out_8(&i2c_reg->i2cer, 0xff);
	189	}
	190
	191	static void cpm_i2c_parse_message(struct i2c_adapter *adap,
	192	struct i2c_msg *pmsg, int num, int tx, int rx)
	193	{
	194	cbd_t __iomem *tbdf;
	195	cbd_t __iomem *rbdf;
	196	u_char addr;
	197	u_char *tb;
	198	u_char *rb;
	199	struct cpm_i2c *cpm = i2c_get_adapdata(adap);
	200
	201	tbdf = cpm->tbase + tx;
	202	rbdf = cpm->rbase + rx;
	203
	204	addr = pmsg->addr << 1;
	205	if (pmsg->flags & I2C_M_RD)
	206	addr \|= 1;
	207
208	tb = cpm->txbuf[tx];
209	rb = cpm->rxbuf[rx];
210
211	/* Align read buffer */
212	rb = (u_char *) (((ulong) rb + 1) & ~1);
213
214	tb[0] = addr; /* Device address byte w/rw flag */
215
216	out_be16(&tbdf->cbd_datlen, pmsg->len + 1);
217	out_be16(&tbdf->cbd_sc, 0);
218
219	if (!(pmsg->flags & I2C_M_NOSTART))
220	setbits16(&tbdf->cbd_sc, BD_I2C_START);
221
222	if (tx + 1 == num)
223	setbits16(&tbdf->cbd_sc, BD_SC_LAST \| BD_SC_WRAP);
224
225	if (pmsg->flags & I2C_M_RD) {
226	/*
227	* To read, we need an empty buffer of the proper length.
228	* All that is used is the first byte for address, the remainder
229	* is just used for timing (and doesn't really have to exist).
230	*/
231
232	dev_dbg(&adap->dev, "cpm_i2c_read(abyte=0x%x)\n", addr);
233
234	out_be16(&rbdf->cbd_datlen, 0);
235	out_be16(&rbdf->cbd_sc, BD_SC_EMPTY \| BD_SC_INTRPT);
236
237	if (rx + 1 == CPM_MAXBD)
238	setbits16(&rbdf->cbd_sc, BD_SC_WRAP);
239
240	eieio();
241	setbits16(&tbdf->cbd_sc, BD_SC_READY);
242	} else {
3b270804	243	dev_dbg(&adap->dev, "cpm_i2c_write(abyte=0x%x)\n", addr);
61045dbe JF	244
	245	memcpy(tb+1, pmsg->buf, pmsg->len);
	246
	247	eieio();
	248	setbits16(&tbdf->cbd_sc, BD_SC_READY \| BD_SC_INTRPT);
	249	}
	250	}
	251
	252	static int cpm_i2c_check_message(struct i2c_adapter *adap,
	253	struct i2c_msg *pmsg, int tx, int rx)
	254	{
	255	cbd_t __iomem *tbdf;
	256	cbd_t __iomem *rbdf;
	257	u_char *tb;
	258	u_char *rb;
	259	struct cpm_i2c *cpm = i2c_get_adapdata(adap);
	260
	261	tbdf = cpm->tbase + tx;
	262	rbdf = cpm->rbase + rx;
	263
	264	tb = cpm->txbuf[tx];
	265	rb = cpm->rxbuf[rx];
	266
	267	/* Align read buffer */
	268	rb = (u_char *) (((uint) rb + 1) & ~1);
	269
	270	eieio();
	271	if (pmsg->flags & I2C_M_RD) {
	272	dev_dbg(&adap->dev, "tx sc 0x%04x, rx sc 0x%04x\n",
	273	in_be16(&tbdf->cbd_sc), in_be16(&rbdf->cbd_sc));
	274
	275	if (in_be16(&tbdf->cbd_sc) & BD_SC_NAK) {
	276	dev_dbg(&adap->dev, "I2C read; No ack\n");
	277	return -ENXIO;
	278	}
	279	if (in_be16(&rbdf->cbd_sc) & BD_SC_EMPTY) {
	280	dev_err(&adap->dev,
	281	"I2C read; complete but rbuf empty\n");
	282	return -EREMOTEIO;
	283	}
	284	if (in_be16(&rbdf->cbd_sc) & BD_SC_OV) {
	285	dev_err(&adap->dev, "I2C read; Overrun\n");
	286	return -EREMOTEIO;
	287	}
	288	memcpy(pmsg->buf, rb, pmsg->len);
	289	} else {
	290	dev_dbg(&adap->dev, "tx sc %d 0x%04x\n", tx,
	291	in_be16(&tbdf->cbd_sc));
	292
	293	if (in_be16(&tbdf->cbd_sc) & BD_SC_NAK) {
	294	dev_dbg(&adap->dev, "I2C write; No ack\n");
	295	return -ENXIO;
	296	}
	297	if (in_be16(&tbdf->cbd_sc) & BD_SC_UN) {
	298	dev_err(&adap->dev, "I2C write; Underrun\n");
	299	return -EIO;
	300	}
	301	if (in_be16(&tbdf->cbd_sc) & BD_SC_CL) {
	302	dev_err(&adap->dev, "I2C write; Collision\n");
	303	return -EIO;
	304	}
	305	}
	306	return 0;
	307	}
308
309	static int cpm_i2c_xfer(struct i2c_adapter adap, struct i2c_msg msgs, int num)
310	{
311	struct cpm_i2c *cpm = i2c_get_adapdata(adap);
312	struct i2c_reg __iomem *i2c_reg = cpm->i2c_reg;
313	struct i2c_ram __iomem *i2c_ram = cpm->i2c_ram;
314	struct i2c_msg *pmsg;
315	int ret, i;
316	int tptr;
317	int rptr;
318	cbd_t __iomem *tbdf;
319	cbd_t __iomem *rbdf;
320
321	if (num > CPM_MAXBD)
322	return -EINVAL;
323
324	/* Check if we have any oversized READ requests */
325	for (i = 0; i < num; i++) {
326	pmsg = &msgs[i];
327	if (pmsg->len >= CPM_MAX_READ)
328	return -EINVAL;
329	}
330
331	/* Reset to use first buffer */
332	out_be16(&i2c_ram->rbptr, in_be16(&i2c_ram->rbase));
333	out_be16(&i2c_ram->tbptr, in_be16(&i2c_ram->tbase));
334
335	tbdf = cpm->tbase;
336	rbdf = cpm->rbase;
337
338	tptr = 0;
339	rptr = 0;
340
341	while (tptr < num) {
342	pmsg = &msgs[tptr];
343	dev_dbg(&adap->dev, "R: %d T: %d\n", rptr, tptr);
344
345	cpm_i2c_parse_message(adap, pmsg, num, tptr, rptr);
346	if (pmsg->flags & I2C_M_RD)
347	rptr++;
348	tptr++;
349	}
350	/* Start transfer now */
351	/* Enable RX/TX/Error interupts */
3b270804	352	out_8(&i2c_reg->i2cmr, I2CER_TXE \| I2CER_TXB \| I2CER_RXB);
61045dbe JF	353	out_8(&i2c_reg->i2cer, 0xff); /* Clear interrupt status */
	354	/* Chip bug, set enable here */
	355	setbits8(&i2c_reg->i2mod, I2MOD_EN); /* Enable */
	356	/* Begin transmission */
	357	setbits8(&i2c_reg->i2com, I2COM_START);
	358
	359	tptr = 0;
	360	rptr = 0;
	361
	362	while (tptr < num) {
	363	/* Check for outstanding messages */
	364	dev_dbg(&adap->dev, "test ready.\n");
	365	pmsg = &msgs[tptr];
	366	if (pmsg->flags & I2C_M_RD)
dc1972d0	367	ret = wait_event_timeout(cpm->i2c_wait,
a804644a	368	(in_be16(&tbdf[tptr].cbd_sc) & BD_SC_NAK) \|\|
61045dbe JF	369	!(in_be16(&rbdf[rptr].cbd_sc) & BD_SC_EMPTY),
	370	1 * HZ);
	371	else
dc1972d0	372	ret = wait_event_timeout(cpm->i2c_wait,
61045dbe JF	373	!(in_be16(&tbdf[tptr].cbd_sc) & BD_SC_READY),
	374	1 * HZ);
	375	if (ret == 0) {
	376	ret = -EREMOTEIO;
	377	dev_err(&adap->dev, "I2C transfer: timeout\n");
	378	goto out_err;
	379	}
	380	if (ret > 0) {
	381	dev_dbg(&adap->dev, "ready.\n");
	382	ret = cpm_i2c_check_message(adap, pmsg, tptr, rptr);
	383	tptr++;
	384	if (pmsg->flags & I2C_M_RD)
	385	rptr++;
	386	if (ret)
	387	goto out_err;
	388	}
	389	}
	390	#ifdef I2C_CHIP_ERRATA
	391	/*
	392	* Chip errata, clear enable. This is not needed on rev D4 CPUs.
	393	* Disabling I2C too early may cause too short stop condition
	394	*/
	395	udelay(4);
	396	clrbits8(&i2c_reg->i2mod, I2MOD_EN);
	397	#endif
	398	return (num);
	399
	400	out_err:
	401	cpm_i2c_force_close(adap);
	402	#ifdef I2C_CHIP_ERRATA
	403	/*
	404	* Chip errata, clear enable. This is not needed on rev D4 CPUs.
	405	*/
	406	clrbits8(&i2c_reg->i2mod, I2MOD_EN);
	407	#endif
	408	return ret;
	409	}
	410
	411	static u32 cpm_i2c_func(struct i2c_adapter *adap)
	412	{
	413	return I2C_FUNC_I2C \| (I2C_FUNC_SMBUS_EMUL & ~I2C_FUNC_SMBUS_QUICK);
	414	}
	415
	416	/* -----exported algorithm data: ------------------------------------- */
	417
	418	static const struct i2c_algorithm cpm_i2c_algo = {
	419	.master_xfer = cpm_i2c_xfer,
	420	.functionality = cpm_i2c_func,
	421	};
	422
	423	static const struct i2c_adapter cpm_ops = {
	424	.owner = THIS_MODULE,
	425	.name = "i2c-cpm",
	426	.algo = &cpm_i2c_algo,
61045dbe JF	427	};
	428
	429	static int __devinit cpm_i2c_setup(struct cpm_i2c *cpm)
	430	{
2dc11581	431	struct platform_device *ofdev = cpm->ofdev;
61045dbe JF	432	const u32 *data;
	433	int len, ret, i;
	434	void __iomem *i2c_base;
	435	cbd_t __iomem *tbdf;
	436	cbd_t __iomem *rbdf;
	437	unsigned char brg;
	438
	439	dev_dbg(&cpm->ofdev->dev, "cpm_i2c_setup()\n");
	440
	441	init_waitqueue_head(&cpm->i2c_wait);
	442
61c7a080	443	cpm->irq = of_irq_to_resource(ofdev->dev.of_node, 0, NULL);
b865a4e7	444	if (!cpm->irq)
61045dbe JF	445	return -EINVAL;
	446
	447	/* Install interrupt handler. */
	448	ret = request_irq(cpm->irq, cpm_i2c_interrupt, 0, "cpm_i2c",
	449	&cpm->adap);
	450	if (ret)
	451	return ret;
	452
	453	/* I2C parameter RAM */
61c7a080	454	i2c_base = of_iomap(ofdev->dev.of_node, 1);
61045dbe JF	455	if (i2c_base == NULL) {
	456	ret = -EINVAL;
	457	goto out_irq;
	458	}
	459
61c7a080	460	if (of_device_is_compatible(ofdev->dev.of_node, "fsl,cpm1-i2c")) {
61045dbe JF	461
	462	/* Check for and use a microcode relocation patch. */
	463	cpm->i2c_ram = i2c_base;
	464	cpm->i2c_addr = in_be16(&cpm->i2c_ram->rpbase);
	465
	466	/*
	467	* Maybe should use cpm_muram_alloc instead of hardcoding
	468	* this in micropatch.c
	469	*/
	470	if (cpm->i2c_addr) {
	471	cpm->i2c_ram = cpm_muram_addr(cpm->i2c_addr);
	472	iounmap(i2c_base);
	473	}
	474
	475	cpm->version = 1;
	476
61c7a080	477	} else if (of_device_is_compatible(ofdev->dev.of_node, "fsl,cpm2-i2c")) {
61045dbe JF	478	cpm->i2c_addr = cpm_muram_alloc(sizeof(struct i2c_ram), 64);
	479	cpm->i2c_ram = cpm_muram_addr(cpm->i2c_addr);
	480	out_be16(i2c_base, cpm->i2c_addr);
	481	iounmap(i2c_base);
	482
	483	cpm->version = 2;
	484
	485	} else {
	486	iounmap(i2c_base);
	487	ret = -EINVAL;
	488	goto out_irq;
	489	}
	490
	491	/* I2C control/status registers */
61c7a080	492	cpm->i2c_reg = of_iomap(ofdev->dev.of_node, 0);
61045dbe JF	493	if (cpm->i2c_reg == NULL) {
	494	ret = -EINVAL;
	495	goto out_ram;
	496	}
	497
61c7a080	498	data = of_get_property(ofdev->dev.of_node, "fsl,cpm-command", &len);
61045dbe JF	499	if (!data \|\| len != 4) {
	500	ret = -EINVAL;
	501	goto out_reg;
	502	}
	503	cpm->cp_command = *data;
	504
61c7a080	505	data = of_get_property(ofdev->dev.of_node, "linux,i2c-class", &len);
61045dbe JF	506	if (data && len == 4)
	507	cpm->adap.class = *data;
	508
61c7a080	509	data = of_get_property(ofdev->dev.of_node, "clock-frequency", &len);
61045dbe JF	510	if (data && len == 4)
	511	cpm->freq = *data;
	512	else
	513	cpm->freq = 60000; /* use 60kHz i2c clock by default */
	514
	515	/*
	516	* Allocate space for CPM_MAXBD transmit and receive buffer
	517	* descriptors in the DP ram.
	518	*/
	519	cpm->dp_addr = cpm_muram_alloc(sizeof(cbd_t) * 2 * CPM_MAXBD, 8);
	520	if (!cpm->dp_addr) {
	521	ret = -ENOMEM;
	522	goto out_reg;
	523	}
	524
	525	cpm->tbase = cpm_muram_addr(cpm->dp_addr);
	526	cpm->rbase = cpm_muram_addr(cpm->dp_addr + sizeof(cbd_t) * CPM_MAXBD);
	527
	528	/* Allocate TX and RX buffers */
	529
	530	tbdf = cpm->tbase;
	531	rbdf = cpm->rbase;
	532
	533	for (i = 0; i < CPM_MAXBD; i++) {
36521c27 MW	534	cpm->rxbuf[i] = dma_alloc_coherent(&cpm->ofdev->dev,
	535	CPM_MAX_READ + 1,
	536	&cpm->rxdma[i], GFP_KERNEL);
61045dbe JF	537	if (!cpm->rxbuf[i]) {
	538	ret = -ENOMEM;
	539	goto out_muram;
	540	}
	541	out_be32(&rbdf[i].cbd_bufaddr, ((cpm->rxdma[i] + 1) & ~1));
	542
36521c27	543	cpm->txbuf[i] = (unsigned char *)dma_alloc_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1, &cpm->txdma[i], GFP_KERNEL);
61045dbe JF	544	if (!cpm->txbuf[i]) {
	545	ret = -ENOMEM;
	546	goto out_muram;
	547	}
	548	out_be32(&tbdf[i].cbd_bufaddr, cpm->txdma[i]);
	549	}
	550
	551	/* Initialize Tx/Rx parameters. */
	552
	553	cpm_reset_i2c_params(cpm);
	554
3b270804 WS	555	dev_dbg(&cpm->ofdev->dev, "i2c_ram 0x%p, i2c_addr 0x%04x, freq %d\n",
3b270804 WS	556	cpm->i2c_ram, cpm->i2c_addr, cpm->freq);
61045dbe JF	557	dev_dbg(&cpm->ofdev->dev, "tbase 0x%04x, rbase 0x%04x\n",
	558	(u8 __iomem *)cpm->tbase - DPRAM_BASE,
	559	(u8 __iomem *)cpm->rbase - DPRAM_BASE);
	560
	561	cpm_command(cpm->cp_command, CPM_CR_INIT_TRX);
	562
	563	/*
	564	* Select an invalid address. Just make sure we don't use loopback mode
	565	*/
	566	out_8(&cpm->i2c_reg->i2add, 0x7f << 1);
	567
	568	/*
	569	* PDIV is set to 00 in i2mod, so brgclk/32 is used as input to the
	570	* i2c baud rate generator. This is divided by 2 x (DIV + 3) to get
	571	* the actual i2c bus frequency.
	572	*/
	573	brg = get_brgfreq() / (32 * 2 * cpm->freq) - 3;
	574	out_8(&cpm->i2c_reg->i2brg, brg);
	575
	576	out_8(&cpm->i2c_reg->i2mod, 0x00);
	577	out_8(&cpm->i2c_reg->i2com, I2COM_MASTER); /* Master mode */
	578
	579	/* Disable interrupts. */
	580	out_8(&cpm->i2c_reg->i2cmr, 0);
	581	out_8(&cpm->i2c_reg->i2cer, 0xff);
	582
	583	return 0;
	584
	585	out_muram:
	586	for (i = 0; i < CPM_MAXBD; i++) {
	587	if (cpm->rxbuf[i])
36521c27	588	dma_free_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1,
61045dbe JF	589	cpm->rxbuf[i], cpm->rxdma[i]);
61045dbe JF	590	if (cpm->txbuf[i])
36521c27	591	dma_free_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1,
61045dbe JF	592	cpm->txbuf[i], cpm->txdma[i]);
	593	}
	594	cpm_muram_free(cpm->dp_addr);
	595	out_reg:
	596	iounmap(cpm->i2c_reg);
	597	out_ram:
	598	if ((cpm->version == 1) && (!cpm->i2c_addr))
	599	iounmap(cpm->i2c_ram);
	600	if (cpm->version == 2)
	601	cpm_muram_free(cpm->i2c_addr);
	602	out_irq:
	603	free_irq(cpm->irq, &cpm->adap);
	604	return ret;
	605	}
	606
	607	static void cpm_i2c_shutdown(struct cpm_i2c *cpm)
	608	{
	609	int i;
	610
	611	/* Shut down I2C. */
	612	clrbits8(&cpm->i2c_reg->i2mod, I2MOD_EN);
	613
	614	/* Disable interrupts */
	615	out_8(&cpm->i2c_reg->i2cmr, 0);
	616	out_8(&cpm->i2c_reg->i2cer, 0xff);
	617
	618	free_irq(cpm->irq, &cpm->adap);
	619
	620	/* Free all memory */
	621	for (i = 0; i < CPM_MAXBD; i++) {
36521c27	622	dma_free_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1,
61045dbe	623	cpm->rxbuf[i], cpm->rxdma[i]);
36521c27	624	dma_free_coherent(&cpm->ofdev->dev, CPM_MAX_READ + 1,
61045dbe JF	625	cpm->txbuf[i], cpm->txdma[i]);
	626	}
	627
	628	cpm_muram_free(cpm->dp_addr);
	629	iounmap(cpm->i2c_reg);
	630
	631	if ((cpm->version == 1) && (!cpm->i2c_addr))
	632	iounmap(cpm->i2c_ram);
	633	if (cpm->version == 2)
	634	cpm_muram_free(cpm->i2c_addr);
	635	}
	636
2dc11581	637	static int __devinit cpm_i2c_probe(struct platform_device *ofdev,
61045dbe JF	638	const struct of_device_id *match)
	639	{
	640	int result, len;
	641	struct cpm_i2c *cpm;
	642	const u32 *data;
	643
	644	cpm = kzalloc(sizeof(struct cpm_i2c), GFP_KERNEL);
	645	if (!cpm)
	646	return -ENOMEM;
	647
	648	cpm->ofdev = ofdev;
	649
	650	dev_set_drvdata(&ofdev->dev, cpm);
	651
	652	cpm->adap = cpm_ops;
	653	i2c_set_adapdata(&cpm->adap, cpm);
	654	cpm->adap.dev.parent = &ofdev->dev;
9fd04992	655	cpm->adap.dev.of_node = of_node_get(ofdev->dev.of_node);
61045dbe JF	656
	657	result = cpm_i2c_setup(cpm);
	658	if (result) {
	659	dev_err(&ofdev->dev, "Unable to init hardware\n");
	660	goto out_free;
	661	}
	662
	663	/* register new adapter to i2c module... */
	664
61c7a080	665	data = of_get_property(ofdev->dev.of_node, "linux,i2c-index", &len);
61045dbe JF	666	if (data && len == 4) {
	667	cpm->adap.nr = *data;
	668	result = i2c_add_numbered_adapter(&cpm->adap);
	669	} else
	670	result = i2c_add_adapter(&cpm->adap);
	671
	672	if (result < 0) {
	673	dev_err(&ofdev->dev, "Unable to register with I2C\n");
	674	goto out_shut;
	675	}
	676
	677	dev_dbg(&ofdev->dev, "hw routines for %s registered.\n",
	678	cpm->adap.name);
	679
925bb9c6 GL	680	/*
	681	* register OF I2C devices
	682	*/
	683	of_i2c_register_devices(&cpm->adap);
	684
61045dbe JF	685	return 0;
	686	out_shut:
	687	cpm_i2c_shutdown(cpm);
	688	out_free:
	689	dev_set_drvdata(&ofdev->dev, NULL);
	690	kfree(cpm);
	691
	692	return result;
	693	}
	694
2dc11581	695	static int __devexit cpm_i2c_remove(struct platform_device *ofdev)
61045dbe JF	696	{
	697	struct cpm_i2c *cpm = dev_get_drvdata(&ofdev->dev);
	698
	699	i2c_del_adapter(&cpm->adap);
	700
	701	cpm_i2c_shutdown(cpm);
	702
	703	dev_set_drvdata(&ofdev->dev, NULL);
	704	kfree(cpm);
	705
	706	return 0;
	707	}
	708
	709	static const struct of_device_id cpm_i2c_match[] = {
	710	{
	711	.compatible = "fsl,cpm1-i2c",
	712	},
	713	{
	714	.compatible = "fsl,cpm2-i2c",
	715	},
	716	{},
	717	};
	718
	719	MODULE_DEVICE_TABLE(of, cpm_i2c_match);
	720
	721	static struct of_platform_driver cpm_i2c_driver = {
61045dbe JF	722	.probe = cpm_i2c_probe,
61045dbe JF	723	.remove = __devexit_p(cpm_i2c_remove),
4018294b GL	724	.driver = {
	725	.name = "fsl-i2c-cpm",
	726	.owner = THIS_MODULE,
	727	.of_match_table = cpm_i2c_match,
	728	},
61045dbe JF	729	};
	730
	731	static int __init cpm_i2c_init(void)
	732	{
	733	return of_register_platform_driver(&cpm_i2c_driver);
	734	}
	735
	736	static void __exit cpm_i2c_exit(void)
	737	{
	738	of_unregister_platform_driver(&cpm_i2c_driver);
	739	}
	740
	741	module_init(cpm_i2c_init);
	742	module_exit(cpm_i2c_exit);
	743
	744	MODULE_AUTHOR("Jochen Friedrich <jochen@scram.de>");
	745	MODULE_DESCRIPTION("I2C-Bus adapter routines for CPM boards");
	746	MODULE_LICENSE("GPL");