Merge master.kernel.org:/pub/scm/linux/kernel/git/gregkh/driver-2.6
[linux-2.6] / drivers / i2c / busses / i2c-mpc.c
1 /*
2  * (C) Copyright 2003-2004
3  * Humboldt Solutions Ltd, adrian@humboldt.co.uk.
4
5  * This is a combined i2c adapter and algorithm driver for the
6  * MPC107/Tsi107 PowerPC northbridge and processors that include
7  * the same I2C unit (8240, 8245, 85xx).
8  *
9  * Release 0.8
10  *
11  * This file is licensed under the terms of the GNU General Public
12  * License version 2. This program is licensed "as is" without any
13  * warranty of any kind, whether express or implied.
14  */
15
16 #include <linux/config.h>
17 #include <linux/kernel.h>
18 #include <linux/module.h>
19 #include <linux/sched.h>
20 #include <linux/init.h>
21 #include <linux/pci.h>
22 #include <asm/io.h>
23 #include <linux/fsl_devices.h>
24 #include <linux/i2c.h>
25 #include <linux/interrupt.h>
26 #include <linux/delay.h>
27
28 #define MPC_I2C_ADDR  0x00
29 #define MPC_I2C_FDR     0x04
30 #define MPC_I2C_CR      0x08
31 #define MPC_I2C_SR      0x0c
32 #define MPC_I2C_DR      0x10
33 #define MPC_I2C_DFSRR 0x14
34 #define MPC_I2C_REGION 0x20
35
36 #define CCR_MEN  0x80
37 #define CCR_MIEN 0x40
38 #define CCR_MSTA 0x20
39 #define CCR_MTX  0x10
40 #define CCR_TXAK 0x08
41 #define CCR_RSTA 0x04
42
43 #define CSR_MCF  0x80
44 #define CSR_MAAS 0x40
45 #define CSR_MBB  0x20
46 #define CSR_MAL  0x10
47 #define CSR_SRW  0x04
48 #define CSR_MIF  0x02
49 #define CSR_RXAK 0x01
50
51 struct mpc_i2c {
52         void __iomem *base;
53         u32 interrupt;
54         wait_queue_head_t queue;
55         struct i2c_adapter adap;
56         int irq;
57         u32 flags;
58 };
59
60 static __inline__ void writeccr(struct mpc_i2c *i2c, u32 x)
61 {
62         writeb(x, i2c->base + MPC_I2C_CR);
63 }
64
65 static irqreturn_t mpc_i2c_isr(int irq, void *dev_id, struct pt_regs *regs)
66 {
67         struct mpc_i2c *i2c = dev_id;
68         if (readb(i2c->base + MPC_I2C_SR) & CSR_MIF) {
69                 /* Read again to allow register to stabilise */
70                 i2c->interrupt = readb(i2c->base + MPC_I2C_SR);
71                 writeb(0, i2c->base + MPC_I2C_SR);
72                 wake_up_interruptible(&i2c->queue);
73         }
74         return IRQ_HANDLED;
75 }
76
77 static int i2c_wait(struct mpc_i2c *i2c, unsigned timeout, int writing)
78 {
79         unsigned long orig_jiffies = jiffies;
80         u32 x;
81         int result = 0;
82
83         if (i2c->irq == 0)
84         {
85                 while (!(readb(i2c->base + MPC_I2C_SR) & CSR_MIF)) {
86                         schedule();
87                         if (time_after(jiffies, orig_jiffies + timeout)) {
88                                 pr_debug("I2C: timeout\n");
89                                 result = -EIO;
90                                 break;
91                         }
92                 }
93                 x = readb(i2c->base + MPC_I2C_SR);
94                 writeb(0, i2c->base + MPC_I2C_SR);
95         } else {
96                 /* Interrupt mode */
97                 result = wait_event_interruptible_timeout(i2c->queue,
98                         (i2c->interrupt & CSR_MIF), timeout * HZ);
99
100                 if (unlikely(result < 0))
101                         pr_debug("I2C: wait interrupted\n");
102                 else if (unlikely(!(i2c->interrupt & CSR_MIF))) {
103                         pr_debug("I2C: wait timeout\n");
104                         result = -ETIMEDOUT;
105                 }
106
107                 x = i2c->interrupt;
108                 i2c->interrupt = 0;
109         }
110
111         if (result < 0)
112                 return result;
113
114         if (!(x & CSR_MCF)) {
115                 pr_debug("I2C: unfinished\n");
116                 return -EIO;
117         }
118
119         if (x & CSR_MAL) {
120                 pr_debug("I2C: MAL\n");
121                 return -EIO;
122         }
123
124         if (writing && (x & CSR_RXAK)) {
125                 pr_debug("I2C: No RXAK\n");
126                 /* generate stop */
127                 writeccr(i2c, CCR_MEN);
128                 return -EIO;
129         }
130         return 0;
131 }
132
133 static void mpc_i2c_setclock(struct mpc_i2c *i2c)
134 {
135         /* Set clock and filters */
136         if (i2c->flags & FSL_I2C_DEV_SEPARATE_DFSRR) {
137                 writeb(0x31, i2c->base + MPC_I2C_FDR);
138                 writeb(0x10, i2c->base + MPC_I2C_DFSRR);
139         } else if (i2c->flags & FSL_I2C_DEV_CLOCK_5200)
140                 writeb(0x3f, i2c->base + MPC_I2C_FDR);
141         else
142                 writel(0x1031, i2c->base + MPC_I2C_FDR);
143 }
144
145 static void mpc_i2c_start(struct mpc_i2c *i2c)
146 {
147         /* Clear arbitration */
148         writeb(0, i2c->base + MPC_I2C_SR);
149         /* Start with MEN */
150         writeccr(i2c, CCR_MEN);
151 }
152
153 static void mpc_i2c_stop(struct mpc_i2c *i2c)
154 {
155         writeccr(i2c, CCR_MEN);
156 }
157
158 static int mpc_write(struct mpc_i2c *i2c, int target,
159                      const u8 * data, int length, int restart)
160 {
161         int i;
162         unsigned timeout = i2c->adap.timeout;
163         u32 flags = restart ? CCR_RSTA : 0;
164
165         /* Start with MEN */
166         if (!restart)
167                 writeccr(i2c, CCR_MEN);
168         /* Start as master */
169         writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA | CCR_MTX | flags);
170         /* Write target byte */
171         writeb((target << 1), i2c->base + MPC_I2C_DR);
172
173         if (i2c_wait(i2c, timeout, 1) < 0)
174                 return -1;
175
176         for (i = 0; i < length; i++) {
177                 /* Write data byte */
178                 writeb(data[i], i2c->base + MPC_I2C_DR);
179
180                 if (i2c_wait(i2c, timeout, 1) < 0)
181                         return -1;
182         }
183
184         return 0;
185 }
186
187 static int mpc_read(struct mpc_i2c *i2c, int target,
188                     u8 * data, int length, int restart)
189 {
190         unsigned timeout = i2c->adap.timeout;
191         int i;
192         u32 flags = restart ? CCR_RSTA : 0;
193
194         /* Start with MEN */
195         if (!restart)
196                 writeccr(i2c, CCR_MEN);
197         /* Switch to read - restart */
198         writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA | CCR_MTX | flags);
199         /* Write target address byte - this time with the read flag set */
200         writeb((target << 1) | 1, i2c->base + MPC_I2C_DR);
201
202         if (i2c_wait(i2c, timeout, 1) < 0)
203                 return -1;
204
205         if (length) {
206                 if (length == 1)
207                         writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA | CCR_TXAK);
208                 else
209                         writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA);
210                 /* Dummy read */
211                 readb(i2c->base + MPC_I2C_DR);
212         }
213
214         for (i = 0; i < length; i++) {
215                 if (i2c_wait(i2c, timeout, 0) < 0)
216                         return -1;
217
218                 /* Generate txack on next to last byte */
219                 if (i == length - 2)
220                         writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_MSTA | CCR_TXAK);
221                 /* Generate stop on last byte */
222                 if (i == length - 1)
223                         writeccr(i2c, CCR_MIEN | CCR_MEN | CCR_TXAK);
224                 data[i] = readb(i2c->base + MPC_I2C_DR);
225         }
226
227         return length;
228 }
229
230 static int mpc_xfer(struct i2c_adapter *adap, struct i2c_msg *msgs, int num)
231 {
232         struct i2c_msg *pmsg;
233         int i;
234         int ret = 0;
235         unsigned long orig_jiffies = jiffies;
236         struct mpc_i2c *i2c = i2c_get_adapdata(adap);
237
238         mpc_i2c_start(i2c);
239
240         /* Allow bus up to 1s to become not busy */
241         while (readb(i2c->base + MPC_I2C_SR) & CSR_MBB) {
242                 if (signal_pending(current)) {
243                         pr_debug("I2C: Interrupted\n");
244                         return -EINTR;
245                 }
246                 if (time_after(jiffies, orig_jiffies + HZ)) {
247                         pr_debug("I2C: timeout\n");
248                         return -EIO;
249                 }
250                 schedule();
251         }
252
253         for (i = 0; ret >= 0 && i < num; i++) {
254                 pmsg = &msgs[i];
255                 pr_debug("Doing %s %d bytes to 0x%02x - %d of %d messages\n",
256                          pmsg->flags & I2C_M_RD ? "read" : "write",
257                          pmsg->len, pmsg->addr, i + 1, num);
258                 if (pmsg->flags & I2C_M_RD)
259                         ret =
260                             mpc_read(i2c, pmsg->addr, pmsg->buf, pmsg->len, i);
261                 else
262                         ret =
263                             mpc_write(i2c, pmsg->addr, pmsg->buf, pmsg->len, i);
264         }
265         mpc_i2c_stop(i2c);
266         return (ret < 0) ? ret : num;
267 }
268
269 static u32 mpc_functionality(struct i2c_adapter *adap)
270 {
271         return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL;
272 }
273
274 static struct i2c_algorithm mpc_algo = {
275         .master_xfer = mpc_xfer,
276         .functionality = mpc_functionality,
277 };
278
279 static struct i2c_adapter mpc_ops = {
280         .owner = THIS_MODULE,
281         .name = "MPC adapter",
282         .id = I2C_HW_MPC107,
283         .algo = &mpc_algo,
284         .class = I2C_CLASS_HWMON,
285         .timeout = 1,
286         .retries = 1
287 };
288
289 static int fsl_i2c_probe(struct device *device)
290 {
291         int result = 0;
292         struct mpc_i2c *i2c;
293         struct platform_device *pdev = to_platform_device(device);
294         struct fsl_i2c_platform_data *pdata;
295         struct resource *r = platform_get_resource(pdev, IORESOURCE_MEM, 0);
296
297         pdata = (struct fsl_i2c_platform_data *) pdev->dev.platform_data;
298
299         if (!(i2c = kmalloc(sizeof(*i2c), GFP_KERNEL))) {
300                 return -ENOMEM;
301         }
302         memset(i2c, 0, sizeof(*i2c));
303
304         i2c->irq = platform_get_irq(pdev, 0);
305         i2c->flags = pdata->device_flags;
306         init_waitqueue_head(&i2c->queue);
307
308         i2c->base = ioremap((phys_addr_t)r->start, MPC_I2C_REGION);
309
310         if (!i2c->base) {
311                 printk(KERN_ERR "i2c-mpc - failed to map controller\n");
312                 result = -ENOMEM;
313                 goto fail_map;
314         }
315
316         if (i2c->irq != 0)
317                 if ((result = request_irq(i2c->irq, mpc_i2c_isr,
318                                           SA_SHIRQ, "i2c-mpc", i2c)) < 0) {
319                         printk(KERN_ERR
320                                "i2c-mpc - failed to attach interrupt\n");
321                         goto fail_irq;
322                 }
323
324         mpc_i2c_setclock(i2c);
325         dev_set_drvdata(device, i2c);
326
327         i2c->adap = mpc_ops;
328         i2c_set_adapdata(&i2c->adap, i2c);
329         i2c->adap.dev.parent = &pdev->dev;
330         if ((result = i2c_add_adapter(&i2c->adap)) < 0) {
331                 printk(KERN_ERR "i2c-mpc - failed to add adapter\n");
332                 goto fail_add;
333         }
334
335         return result;
336
337       fail_add:
338         if (i2c->irq != 0)
339                 free_irq(i2c->irq, NULL);
340       fail_irq:
341         iounmap(i2c->base);
342       fail_map:
343         kfree(i2c);
344         return result;
345 };
346
347 static int fsl_i2c_remove(struct device *device)
348 {
349         struct mpc_i2c *i2c = dev_get_drvdata(device);
350
351         i2c_del_adapter(&i2c->adap);
352         dev_set_drvdata(device, NULL);
353
354         if (i2c->irq != 0)
355                 free_irq(i2c->irq, i2c);
356
357         iounmap(i2c->base);
358         kfree(i2c);
359         return 0;
360 };
361
362 /* Structure for a device driver */
363 static struct device_driver fsl_i2c_driver = {
364         .name = "fsl-i2c",
365         .bus = &platform_bus_type,
366         .probe = fsl_i2c_probe,
367         .remove = fsl_i2c_remove,
368 };
369
370 static int __init fsl_i2c_init(void)
371 {
372         return driver_register(&fsl_i2c_driver);
373 }
374
375 static void __exit fsl_i2c_exit(void)
376 {
377         driver_unregister(&fsl_i2c_driver);
378 }
379
380 module_init(fsl_i2c_init);
381 module_exit(fsl_i2c_exit);
382
383 MODULE_AUTHOR("Adrian Cox <adrian@humboldt.co.uk>");
384 MODULE_DESCRIPTION
385     ("I2C-Bus adapter for MPC107 bridge and MPC824x/85xx/52xx processors");
386 MODULE_LICENSE("GPL");