Merge commit 'origin/master'
[linux-2.6] / drivers / i2c / busses / i2c-cpm.c
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 {
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
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 */
352         out_8(&i2c_reg->i2cmr, I2CER_TXE | I2CER_TXB | I2CER_RXB);
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,
426         .class          = I2C_CLASS_HWMON | I2C_CLASS_SPD,
427 };
428
429 static int __devinit cpm_i2c_setup(struct cpm_i2c *cpm)
430 {
431         struct of_device *ofdev = cpm->ofdev;
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
443         cpm->irq = of_irq_to_resource(ofdev->node, 0, NULL);
444         if (cpm->irq == NO_IRQ)
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 */
454         i2c_base = of_iomap(ofdev->node, 1);
455         if (i2c_base == NULL) {
456                 ret = -EINVAL;
457                 goto out_irq;
458         }
459
460         if (of_device_is_compatible(ofdev->node, "fsl,cpm1-i2c")) {
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
477         } else if (of_device_is_compatible(ofdev->node, "fsl,cpm2-i2c")) {
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 */
492         cpm->i2c_reg = of_iomap(ofdev->node, 0);
493         if (cpm->i2c_reg == NULL) {
494                 ret = -EINVAL;
495                 goto out_ram;
496         }
497
498         data = of_get_property(ofdev->node, "fsl,cpm-command", &len);
499         if (!data || len != 4) {
500                 ret = -EINVAL;
501                 goto out_reg;
502         }
503         cpm->cp_command = *data;
504
505         data = of_get_property(ofdev->node, "linux,i2c-class", &len);
506         if (data && len == 4)
507                 cpm->adap.class = *data;
508
509         data = of_get_property(ofdev->node, "clock-frequency", &len);
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++) {
534                 cpm->rxbuf[i] = dma_alloc_coherent(
535                         NULL, CPM_MAX_READ + 1, &cpm->rxdma[i], GFP_KERNEL);
536                 if (!cpm->rxbuf[i]) {
537                         ret = -ENOMEM;
538                         goto out_muram;
539                 }
540                 out_be32(&rbdf[i].cbd_bufaddr, ((cpm->rxdma[i] + 1) & ~1));
541
542                 cpm->txbuf[i] = (unsigned char *)dma_alloc_coherent(
543                         NULL, CPM_MAX_READ + 1, &cpm->txdma[i], GFP_KERNEL);
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
555         dev_dbg(&cpm->ofdev->dev, "i2c_ram 0x%p, i2c_addr 0x%04x, freq %d\n",
556                 cpm->i2c_ram, cpm->i2c_addr, cpm->freq);
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])
588                         dma_free_coherent(NULL, CPM_MAX_READ + 1,
589                                 cpm->rxbuf[i], cpm->rxdma[i]);
590                 if (cpm->txbuf[i])
591                         dma_free_coherent(NULL, CPM_MAX_READ + 1,
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++) {
622                 dma_free_coherent(NULL, CPM_MAX_READ + 1,
623                         cpm->rxbuf[i], cpm->rxdma[i]);
624                 dma_free_coherent(NULL, CPM_MAX_READ + 1,
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
637 static int __devinit cpm_i2c_probe(struct of_device *ofdev,
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;
655
656         result = cpm_i2c_setup(cpm);
657         if (result) {
658                 dev_err(&ofdev->dev, "Unable to init hardware\n");
659                 goto out_free;
660         }
661
662         /* register new adapter to i2c module... */
663
664         data = of_get_property(ofdev->node, "linux,i2c-index", &len);
665         if (data && len == 4) {
666                 cpm->adap.nr = *data;
667                 result = i2c_add_numbered_adapter(&cpm->adap);
668         } else
669                 result = i2c_add_adapter(&cpm->adap);
670
671         if (result < 0) {
672                 dev_err(&ofdev->dev, "Unable to register with I2C\n");
673                 goto out_shut;
674         }
675
676         dev_dbg(&ofdev->dev, "hw routines for %s registered.\n",
677                 cpm->adap.name);
678
679         /*
680          * register OF I2C devices
681          */
682         of_register_i2c_devices(&cpm->adap, ofdev->node);
683
684         return 0;
685 out_shut:
686         cpm_i2c_shutdown(cpm);
687 out_free:
688         dev_set_drvdata(&ofdev->dev, NULL);
689         kfree(cpm);
690
691         return result;
692 }
693
694 static int __devexit cpm_i2c_remove(struct of_device *ofdev)
695 {
696         struct cpm_i2c *cpm = dev_get_drvdata(&ofdev->dev);
697
698         i2c_del_adapter(&cpm->adap);
699
700         cpm_i2c_shutdown(cpm);
701
702         dev_set_drvdata(&ofdev->dev, NULL);
703         kfree(cpm);
704
705         return 0;
706 }
707
708 static const struct of_device_id cpm_i2c_match[] = {
709         {
710                 .compatible = "fsl,cpm1-i2c",
711         },
712         {
713                 .compatible = "fsl,cpm2-i2c",
714         },
715         {},
716 };
717
718 MODULE_DEVICE_TABLE(of, cpm_i2c_match);
719
720 static struct of_platform_driver cpm_i2c_driver = {
721         .match_table    = cpm_i2c_match,
722         .probe          = cpm_i2c_probe,
723         .remove         = __devexit_p(cpm_i2c_remove),
724         .driver         = {
725                 .name   = "fsl-i2c-cpm",
726                 .owner  = THIS_MODULE,
727         }
728 };
729
730 static int __init cpm_i2c_init(void)
731 {
732         return of_register_platform_driver(&cpm_i2c_driver);
733 }
734
735 static void __exit cpm_i2c_exit(void)
736 {
737         of_unregister_platform_driver(&cpm_i2c_driver);
738 }
739
740 module_init(cpm_i2c_init);
741 module_exit(cpm_i2c_exit);
742
743 MODULE_AUTHOR("Jochen Friedrich <jochen@scram.de>");
744 MODULE_DESCRIPTION("I2C-Bus adapter routines for CPM boards");
745 MODULE_LICENSE("GPL");