| Jochen Friedrich | 61045db | 2008-07-14 22:38:27 +0200 | [diff] [blame] | 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; | 
|  | 108 | struct of_device *ofdev; | 
|  | 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 |  | 
|  | 143 | wake_up_interruptible(&cpm->i2c_wait); | 
|  | 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 { | 
| Wolfram Sang | 3b27080 | 2008-07-14 22:38:28 +0200 | [diff] [blame] | 243 | dev_dbg(&adap->dev, "cpm_i2c_write(abyte=0x%x)\n", addr); | 
| Jochen Friedrich | 61045db | 2008-07-14 22:38:27 +0200 | [diff] [blame] | 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 */ | 
| Wolfram Sang | 3b27080 | 2008-07-14 22:38:28 +0200 | [diff] [blame] | 352 | out_8(&i2c_reg->i2cmr, I2CER_TXE | I2CER_TXB | I2CER_RXB); | 
| Jochen Friedrich | 61045db | 2008-07-14 22:38:27 +0200 | [diff] [blame] | 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) | 
|  | 367 | ret = wait_event_interruptible_timeout(cpm->i2c_wait, | 
|  | 368 | !(in_be16(&rbdf[rptr].cbd_sc) & BD_SC_EMPTY), | 
|  | 369 | 1 * HZ); | 
|  | 370 | else | 
|  | 371 | ret = wait_event_interruptible_timeout(cpm->i2c_wait, | 
|  | 372 | !(in_be16(&tbdf[tptr].cbd_sc) & BD_SC_READY), | 
|  | 373 | 1 * HZ); | 
|  | 374 | if (ret == 0) { | 
|  | 375 | ret = -EREMOTEIO; | 
|  | 376 | dev_err(&adap->dev, "I2C transfer: timeout\n"); | 
|  | 377 | goto out_err; | 
|  | 378 | } | 
|  | 379 | if (ret > 0) { | 
|  | 380 | dev_dbg(&adap->dev, "ready.\n"); | 
|  | 381 | ret = cpm_i2c_check_message(adap, pmsg, tptr, rptr); | 
|  | 382 | tptr++; | 
|  | 383 | if (pmsg->flags & I2C_M_RD) | 
|  | 384 | rptr++; | 
|  | 385 | if (ret) | 
|  | 386 | goto out_err; | 
|  | 387 | } | 
|  | 388 | } | 
|  | 389 | #ifdef I2C_CHIP_ERRATA | 
|  | 390 | /* | 
|  | 391 | * Chip errata, clear enable. This is not needed on rev D4 CPUs. | 
|  | 392 | * Disabling I2C too early may cause too short stop condition | 
|  | 393 | */ | 
|  | 394 | udelay(4); | 
|  | 395 | clrbits8(&i2c_reg->i2mod, I2MOD_EN); | 
|  | 396 | #endif | 
|  | 397 | return (num); | 
|  | 398 |  | 
|  | 399 | out_err: | 
|  | 400 | cpm_i2c_force_close(adap); | 
|  | 401 | #ifdef I2C_CHIP_ERRATA | 
|  | 402 | /* | 
|  | 403 | * Chip errata, clear enable. This is not needed on rev D4 CPUs. | 
|  | 404 | */ | 
|  | 405 | clrbits8(&i2c_reg->i2mod, I2MOD_EN); | 
|  | 406 | #endif | 
|  | 407 | return ret; | 
|  | 408 | } | 
|  | 409 |  | 
|  | 410 | static u32 cpm_i2c_func(struct i2c_adapter *adap) | 
|  | 411 | { | 
|  | 412 | return I2C_FUNC_I2C | (I2C_FUNC_SMBUS_EMUL & ~I2C_FUNC_SMBUS_QUICK); | 
|  | 413 | } | 
|  | 414 |  | 
|  | 415 | /* -----exported algorithm data: -------------------------------------	*/ | 
|  | 416 |  | 
|  | 417 | static const struct i2c_algorithm cpm_i2c_algo = { | 
|  | 418 | .master_xfer = cpm_i2c_xfer, | 
|  | 419 | .functionality = cpm_i2c_func, | 
|  | 420 | }; | 
|  | 421 |  | 
|  | 422 | static const struct i2c_adapter cpm_ops = { | 
|  | 423 | .owner		= THIS_MODULE, | 
|  | 424 | .name		= "i2c-cpm", | 
|  | 425 | .algo		= &cpm_i2c_algo, | 
| Jochen Friedrich | 61045db | 2008-07-14 22:38:27 +0200 | [diff] [blame] | 426 | }; | 
|  | 427 |  | 
|  | 428 | static int __devinit cpm_i2c_setup(struct cpm_i2c *cpm) | 
|  | 429 | { | 
|  | 430 | struct of_device *ofdev = cpm->ofdev; | 
|  | 431 | const u32 *data; | 
|  | 432 | int len, ret, i; | 
|  | 433 | void __iomem *i2c_base; | 
|  | 434 | cbd_t __iomem *tbdf; | 
|  | 435 | cbd_t __iomem *rbdf; | 
|  | 436 | unsigned char brg; | 
|  | 437 |  | 
|  | 438 | dev_dbg(&cpm->ofdev->dev, "cpm_i2c_setup()\n"); | 
|  | 439 |  | 
|  | 440 | init_waitqueue_head(&cpm->i2c_wait); | 
|  | 441 |  | 
|  | 442 | cpm->irq = of_irq_to_resource(ofdev->node, 0, NULL); | 
|  | 443 | if (cpm->irq == NO_IRQ) | 
|  | 444 | return -EINVAL; | 
|  | 445 |  | 
|  | 446 | /* Install interrupt handler. */ | 
|  | 447 | ret = request_irq(cpm->irq, cpm_i2c_interrupt, 0, "cpm_i2c", | 
|  | 448 | &cpm->adap); | 
|  | 449 | if (ret) | 
|  | 450 | return ret; | 
|  | 451 |  | 
|  | 452 | /* I2C parameter RAM */ | 
|  | 453 | i2c_base = of_iomap(ofdev->node, 1); | 
|  | 454 | if (i2c_base == NULL) { | 
|  | 455 | ret = -EINVAL; | 
|  | 456 | goto out_irq; | 
|  | 457 | } | 
|  | 458 |  | 
|  | 459 | if (of_device_is_compatible(ofdev->node, "fsl,cpm1-i2c")) { | 
|  | 460 |  | 
|  | 461 | /* Check for and use a microcode relocation patch. */ | 
|  | 462 | cpm->i2c_ram = i2c_base; | 
|  | 463 | cpm->i2c_addr = in_be16(&cpm->i2c_ram->rpbase); | 
|  | 464 |  | 
|  | 465 | /* | 
|  | 466 | * Maybe should use cpm_muram_alloc instead of hardcoding | 
|  | 467 | * this in micropatch.c | 
|  | 468 | */ | 
|  | 469 | if (cpm->i2c_addr) { | 
|  | 470 | cpm->i2c_ram = cpm_muram_addr(cpm->i2c_addr); | 
|  | 471 | iounmap(i2c_base); | 
|  | 472 | } | 
|  | 473 |  | 
|  | 474 | cpm->version = 1; | 
|  | 475 |  | 
|  | 476 | } else if (of_device_is_compatible(ofdev->node, "fsl,cpm2-i2c")) { | 
|  | 477 | cpm->i2c_addr = cpm_muram_alloc(sizeof(struct i2c_ram), 64); | 
|  | 478 | cpm->i2c_ram = cpm_muram_addr(cpm->i2c_addr); | 
|  | 479 | out_be16(i2c_base, cpm->i2c_addr); | 
|  | 480 | iounmap(i2c_base); | 
|  | 481 |  | 
|  | 482 | cpm->version = 2; | 
|  | 483 |  | 
|  | 484 | } else { | 
|  | 485 | iounmap(i2c_base); | 
|  | 486 | ret = -EINVAL; | 
|  | 487 | goto out_irq; | 
|  | 488 | } | 
|  | 489 |  | 
|  | 490 | /* I2C control/status registers */ | 
|  | 491 | cpm->i2c_reg = of_iomap(ofdev->node, 0); | 
|  | 492 | if (cpm->i2c_reg == NULL) { | 
|  | 493 | ret = -EINVAL; | 
|  | 494 | goto out_ram; | 
|  | 495 | } | 
|  | 496 |  | 
|  | 497 | data = of_get_property(ofdev->node, "fsl,cpm-command", &len); | 
|  | 498 | if (!data || len != 4) { | 
|  | 499 | ret = -EINVAL; | 
|  | 500 | goto out_reg; | 
|  | 501 | } | 
|  | 502 | cpm->cp_command = *data; | 
|  | 503 |  | 
|  | 504 | data = of_get_property(ofdev->node, "linux,i2c-class", &len); | 
|  | 505 | if (data && len == 4) | 
|  | 506 | cpm->adap.class = *data; | 
|  | 507 |  | 
|  | 508 | data = of_get_property(ofdev->node, "clock-frequency", &len); | 
|  | 509 | if (data && len == 4) | 
|  | 510 | cpm->freq = *data; | 
|  | 511 | else | 
|  | 512 | cpm->freq = 60000; /* use 60kHz i2c clock by default */ | 
|  | 513 |  | 
|  | 514 | /* | 
|  | 515 | * Allocate space for CPM_MAXBD transmit and receive buffer | 
|  | 516 | * descriptors in the DP ram. | 
|  | 517 | */ | 
|  | 518 | cpm->dp_addr = cpm_muram_alloc(sizeof(cbd_t) * 2 * CPM_MAXBD, 8); | 
|  | 519 | if (!cpm->dp_addr) { | 
|  | 520 | ret = -ENOMEM; | 
|  | 521 | goto out_reg; | 
|  | 522 | } | 
|  | 523 |  | 
|  | 524 | cpm->tbase = cpm_muram_addr(cpm->dp_addr); | 
|  | 525 | cpm->rbase = cpm_muram_addr(cpm->dp_addr + sizeof(cbd_t) * CPM_MAXBD); | 
|  | 526 |  | 
|  | 527 | /* Allocate TX and RX buffers */ | 
|  | 528 |  | 
|  | 529 | tbdf = cpm->tbase; | 
|  | 530 | rbdf = cpm->rbase; | 
|  | 531 |  | 
|  | 532 | for (i = 0; i < CPM_MAXBD; i++) { | 
|  | 533 | cpm->rxbuf[i] = dma_alloc_coherent( | 
|  | 534 | NULL, CPM_MAX_READ + 1, &cpm->rxdma[i], GFP_KERNEL); | 
|  | 535 | if (!cpm->rxbuf[i]) { | 
|  | 536 | ret = -ENOMEM; | 
|  | 537 | goto out_muram; | 
|  | 538 | } | 
|  | 539 | out_be32(&rbdf[i].cbd_bufaddr, ((cpm->rxdma[i] + 1) & ~1)); | 
|  | 540 |  | 
|  | 541 | cpm->txbuf[i] = (unsigned char *)dma_alloc_coherent( | 
|  | 542 | NULL, CPM_MAX_READ + 1, &cpm->txdma[i], GFP_KERNEL); | 
|  | 543 | if (!cpm->txbuf[i]) { | 
|  | 544 | ret = -ENOMEM; | 
|  | 545 | goto out_muram; | 
|  | 546 | } | 
|  | 547 | out_be32(&tbdf[i].cbd_bufaddr, cpm->txdma[i]); | 
|  | 548 | } | 
|  | 549 |  | 
|  | 550 | /* Initialize Tx/Rx parameters. */ | 
|  | 551 |  | 
|  | 552 | cpm_reset_i2c_params(cpm); | 
|  | 553 |  | 
| Wolfram Sang | 3b27080 | 2008-07-14 22:38:28 +0200 | [diff] [blame] | 554 | dev_dbg(&cpm->ofdev->dev, "i2c_ram 0x%p, i2c_addr 0x%04x, freq %d\n", | 
|  | 555 | cpm->i2c_ram, cpm->i2c_addr, cpm->freq); | 
| Jochen Friedrich | 61045db | 2008-07-14 22:38:27 +0200 | [diff] [blame] | 556 | dev_dbg(&cpm->ofdev->dev, "tbase 0x%04x, rbase 0x%04x\n", | 
|  | 557 | (u8 __iomem *)cpm->tbase - DPRAM_BASE, | 
|  | 558 | (u8 __iomem *)cpm->rbase - DPRAM_BASE); | 
|  | 559 |  | 
|  | 560 | cpm_command(cpm->cp_command, CPM_CR_INIT_TRX); | 
|  | 561 |  | 
|  | 562 | /* | 
|  | 563 | * Select an invalid address. Just make sure we don't use loopback mode | 
|  | 564 | */ | 
|  | 565 | out_8(&cpm->i2c_reg->i2add, 0x7f << 1); | 
|  | 566 |  | 
|  | 567 | /* | 
|  | 568 | * PDIV is set to 00 in i2mod, so brgclk/32 is used as input to the | 
|  | 569 | * i2c baud rate generator. This is divided by 2 x (DIV + 3) to get | 
|  | 570 | * the actual i2c bus frequency. | 
|  | 571 | */ | 
|  | 572 | brg = get_brgfreq() / (32 * 2 * cpm->freq) - 3; | 
|  | 573 | out_8(&cpm->i2c_reg->i2brg, brg); | 
|  | 574 |  | 
|  | 575 | out_8(&cpm->i2c_reg->i2mod, 0x00); | 
|  | 576 | out_8(&cpm->i2c_reg->i2com, I2COM_MASTER);	/* Master mode */ | 
|  | 577 |  | 
|  | 578 | /* Disable interrupts. */ | 
|  | 579 | out_8(&cpm->i2c_reg->i2cmr, 0); | 
|  | 580 | out_8(&cpm->i2c_reg->i2cer, 0xff); | 
|  | 581 |  | 
|  | 582 | return 0; | 
|  | 583 |  | 
|  | 584 | out_muram: | 
|  | 585 | for (i = 0; i < CPM_MAXBD; i++) { | 
|  | 586 | if (cpm->rxbuf[i]) | 
|  | 587 | dma_free_coherent(NULL, CPM_MAX_READ + 1, | 
|  | 588 | cpm->rxbuf[i], cpm->rxdma[i]); | 
|  | 589 | if (cpm->txbuf[i]) | 
|  | 590 | dma_free_coherent(NULL, CPM_MAX_READ + 1, | 
|  | 591 | cpm->txbuf[i], cpm->txdma[i]); | 
|  | 592 | } | 
|  | 593 | cpm_muram_free(cpm->dp_addr); | 
|  | 594 | out_reg: | 
|  | 595 | iounmap(cpm->i2c_reg); | 
|  | 596 | out_ram: | 
|  | 597 | if ((cpm->version == 1) && (!cpm->i2c_addr)) | 
|  | 598 | iounmap(cpm->i2c_ram); | 
|  | 599 | if (cpm->version == 2) | 
|  | 600 | cpm_muram_free(cpm->i2c_addr); | 
|  | 601 | out_irq: | 
|  | 602 | free_irq(cpm->irq, &cpm->adap); | 
|  | 603 | return ret; | 
|  | 604 | } | 
|  | 605 |  | 
|  | 606 | static void cpm_i2c_shutdown(struct cpm_i2c *cpm) | 
|  | 607 | { | 
|  | 608 | int i; | 
|  | 609 |  | 
|  | 610 | /* Shut down I2C. */ | 
|  | 611 | clrbits8(&cpm->i2c_reg->i2mod, I2MOD_EN); | 
|  | 612 |  | 
|  | 613 | /* Disable interrupts */ | 
|  | 614 | out_8(&cpm->i2c_reg->i2cmr, 0); | 
|  | 615 | out_8(&cpm->i2c_reg->i2cer, 0xff); | 
|  | 616 |  | 
|  | 617 | free_irq(cpm->irq, &cpm->adap); | 
|  | 618 |  | 
|  | 619 | /* Free all memory */ | 
|  | 620 | for (i = 0; i < CPM_MAXBD; i++) { | 
|  | 621 | dma_free_coherent(NULL, CPM_MAX_READ + 1, | 
|  | 622 | cpm->rxbuf[i], cpm->rxdma[i]); | 
|  | 623 | dma_free_coherent(NULL, CPM_MAX_READ + 1, | 
|  | 624 | cpm->txbuf[i], cpm->txdma[i]); | 
|  | 625 | } | 
|  | 626 |  | 
|  | 627 | cpm_muram_free(cpm->dp_addr); | 
|  | 628 | iounmap(cpm->i2c_reg); | 
|  | 629 |  | 
|  | 630 | if ((cpm->version == 1) && (!cpm->i2c_addr)) | 
|  | 631 | iounmap(cpm->i2c_ram); | 
|  | 632 | if (cpm->version == 2) | 
|  | 633 | cpm_muram_free(cpm->i2c_addr); | 
|  | 634 | } | 
|  | 635 |  | 
|  | 636 | static int __devinit cpm_i2c_probe(struct of_device *ofdev, | 
|  | 637 | const struct of_device_id *match) | 
|  | 638 | { | 
|  | 639 | int result, len; | 
|  | 640 | struct cpm_i2c *cpm; | 
|  | 641 | const u32 *data; | 
|  | 642 |  | 
|  | 643 | cpm = kzalloc(sizeof(struct cpm_i2c), GFP_KERNEL); | 
|  | 644 | if (!cpm) | 
|  | 645 | return -ENOMEM; | 
|  | 646 |  | 
|  | 647 | cpm->ofdev = ofdev; | 
|  | 648 |  | 
|  | 649 | dev_set_drvdata(&ofdev->dev, cpm); | 
|  | 650 |  | 
|  | 651 | cpm->adap = cpm_ops; | 
|  | 652 | i2c_set_adapdata(&cpm->adap, cpm); | 
|  | 653 | cpm->adap.dev.parent = &ofdev->dev; | 
|  | 654 |  | 
|  | 655 | result = cpm_i2c_setup(cpm); | 
|  | 656 | if (result) { | 
|  | 657 | dev_err(&ofdev->dev, "Unable to init hardware\n"); | 
|  | 658 | goto out_free; | 
|  | 659 | } | 
|  | 660 |  | 
|  | 661 | /* register new adapter to i2c module... */ | 
|  | 662 |  | 
|  | 663 | data = of_get_property(ofdev->node, "linux,i2c-index", &len); | 
|  | 664 | if (data && len == 4) { | 
|  | 665 | cpm->adap.nr = *data; | 
|  | 666 | result = i2c_add_numbered_adapter(&cpm->adap); | 
|  | 667 | } else | 
|  | 668 | result = i2c_add_adapter(&cpm->adap); | 
|  | 669 |  | 
|  | 670 | if (result < 0) { | 
|  | 671 | dev_err(&ofdev->dev, "Unable to register with I2C\n"); | 
|  | 672 | goto out_shut; | 
|  | 673 | } | 
|  | 674 |  | 
|  | 675 | dev_dbg(&ofdev->dev, "hw routines for %s registered.\n", | 
|  | 676 | cpm->adap.name); | 
|  | 677 |  | 
|  | 678 | /* | 
|  | 679 | * register OF I2C devices | 
|  | 680 | */ | 
|  | 681 | of_register_i2c_devices(&cpm->adap, ofdev->node); | 
|  | 682 |  | 
|  | 683 | return 0; | 
|  | 684 | out_shut: | 
|  | 685 | cpm_i2c_shutdown(cpm); | 
|  | 686 | out_free: | 
|  | 687 | dev_set_drvdata(&ofdev->dev, NULL); | 
|  | 688 | kfree(cpm); | 
|  | 689 |  | 
|  | 690 | return result; | 
|  | 691 | } | 
|  | 692 |  | 
|  | 693 | static int __devexit cpm_i2c_remove(struct of_device *ofdev) | 
|  | 694 | { | 
|  | 695 | struct cpm_i2c *cpm = dev_get_drvdata(&ofdev->dev); | 
|  | 696 |  | 
|  | 697 | i2c_del_adapter(&cpm->adap); | 
|  | 698 |  | 
|  | 699 | cpm_i2c_shutdown(cpm); | 
|  | 700 |  | 
|  | 701 | dev_set_drvdata(&ofdev->dev, NULL); | 
|  | 702 | kfree(cpm); | 
|  | 703 |  | 
|  | 704 | return 0; | 
|  | 705 | } | 
|  | 706 |  | 
|  | 707 | static const struct of_device_id cpm_i2c_match[] = { | 
|  | 708 | { | 
|  | 709 | .compatible = "fsl,cpm1-i2c", | 
|  | 710 | }, | 
|  | 711 | { | 
|  | 712 | .compatible = "fsl,cpm2-i2c", | 
|  | 713 | }, | 
|  | 714 | {}, | 
|  | 715 | }; | 
|  | 716 |  | 
|  | 717 | MODULE_DEVICE_TABLE(of, cpm_i2c_match); | 
|  | 718 |  | 
|  | 719 | static struct of_platform_driver cpm_i2c_driver = { | 
|  | 720 | .match_table	= cpm_i2c_match, | 
|  | 721 | .probe		= cpm_i2c_probe, | 
|  | 722 | .remove		= __devexit_p(cpm_i2c_remove), | 
|  | 723 | .driver		= { | 
|  | 724 | .name	= "fsl-i2c-cpm", | 
|  | 725 | .owner	= THIS_MODULE, | 
|  | 726 | } | 
|  | 727 | }; | 
|  | 728 |  | 
|  | 729 | static int __init cpm_i2c_init(void) | 
|  | 730 | { | 
|  | 731 | return of_register_platform_driver(&cpm_i2c_driver); | 
|  | 732 | } | 
|  | 733 |  | 
|  | 734 | static void __exit cpm_i2c_exit(void) | 
|  | 735 | { | 
|  | 736 | of_unregister_platform_driver(&cpm_i2c_driver); | 
|  | 737 | } | 
|  | 738 |  | 
|  | 739 | module_init(cpm_i2c_init); | 
|  | 740 | module_exit(cpm_i2c_exit); | 
|  | 741 |  | 
|  | 742 | MODULE_AUTHOR("Jochen Friedrich <jochen@scram.de>"); | 
|  | 743 | MODULE_DESCRIPTION("I2C-Bus adapter routines for CPM boards"); | 
|  | 744 | MODULE_LICENSE("GPL"); |