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