Merge branch 'for-linus' of git://git.monstr.eu/linux-2.6-microblaze
[linux-2.6] / drivers / i2c / busses / i2c-iop3xx.c
1 /* ------------------------------------------------------------------------- */
2 /* i2c-iop3xx.c i2c driver algorithms for Intel XScale IOP3xx & IXP46x       */
3 /* ------------------------------------------------------------------------- */
4 /* Copyright (C) 2003 Peter Milne, D-TACQ Solutions Ltd
5  *                    <Peter dot Milne at D hyphen TACQ dot com>
6  *
7  * With acknowledgements to i2c-algo-ibm_ocp.c by 
8  * Ian DaSilva, MontaVista Software, Inc. idasilva@mvista.com
9  *
10  * And i2c-algo-pcf.c, which was created by Simon G. Vogl and Hans Berglund:
11  *
12  * Copyright (C) 1995-1997 Simon G. Vogl, 1998-2000 Hans Berglund
13  *  
14  * And which acknowledged Kyösti Mälkki <kmalkki@cc.hut.fi>,
15  * Frodo Looijaard <frodol@dds.nl>, Martin Bailey<mbailey@littlefeet-inc.com>
16  *
17  * Major cleanup by Deepak Saxena <dsaxena@plexity.net>, 01/2005:
18  *
19  * - Use driver model to pass per-chip info instead of hardcoding and #ifdefs
20  * - Use ioremap/__raw_readl/__raw_writel instead of direct dereference
21  * - Make it work with IXP46x chips
22  * - Cleanup function names, coding style, etc
23  *
24  * - writing to slave address causes latchup on iop331.
25  *      fix: driver refuses to address self.
26  *
27  * This program is free software; you can redistribute it and/or modify
28  * it under the terms of the GNU General Public License as published by
29  * the Free Software Foundation, version 2.
30  */
31
32 #include <linux/interrupt.h>
33 #include <linux/kernel.h>
34 #include <linux/module.h>
35 #include <linux/delay.h>
36 #include <linux/slab.h>
37 #include <linux/init.h>
38 #include <linux/errno.h>
39 #include <linux/platform_device.h>
40 #include <linux/i2c.h>
41
42 #include <asm/io.h>
43
44 #include "i2c-iop3xx.h"
45
46 /* global unit counter */
47 static int i2c_id;
48
49 static inline unsigned char 
50 iic_cook_addr(struct i2c_msg *msg) 
51 {
52         unsigned char addr;
53
54         addr = (msg->addr << 1);
55
56         if (msg->flags & I2C_M_RD)
57                 addr |= 1;
58
59         /*
60          * Read or Write?
61          */
62         if (msg->flags & I2C_M_REV_DIR_ADDR)
63                 addr ^= 1;
64
65         return addr;   
66 }
67
68 static void 
69 iop3xx_i2c_reset(struct i2c_algo_iop3xx_data *iop3xx_adap)
70 {
71         /* Follows devman 9.3 */
72         __raw_writel(IOP3XX_ICR_UNIT_RESET, iop3xx_adap->ioaddr + CR_OFFSET);
73         __raw_writel(IOP3XX_ISR_CLEARBITS, iop3xx_adap->ioaddr + SR_OFFSET);
74         __raw_writel(0, iop3xx_adap->ioaddr + CR_OFFSET);
75
76
77 static void 
78 iop3xx_i2c_enable(struct i2c_algo_iop3xx_data *iop3xx_adap)
79 {
80         u32 cr = IOP3XX_ICR_GCD | IOP3XX_ICR_SCLEN | IOP3XX_ICR_UE;
81
82         /* 
83          * Every time unit enable is asserted, GPOD needs to be cleared
84          * on IOP3XX to avoid data corruption on the bus.
85          */
86 #if defined(CONFIG_ARCH_IOP32X) || defined(CONFIG_ARCH_IOP33X)
87         if (iop3xx_adap->id == 0) {
88                 gpio_line_set(IOP3XX_GPIO_LINE(7), GPIO_LOW);
89                 gpio_line_set(IOP3XX_GPIO_LINE(6), GPIO_LOW);
90         } else {
91                 gpio_line_set(IOP3XX_GPIO_LINE(5), GPIO_LOW);
92                 gpio_line_set(IOP3XX_GPIO_LINE(4), GPIO_LOW);
93         }
94 #endif
95         /* NB SR bits not same position as CR IE bits :-( */
96         iop3xx_adap->SR_enabled = 
97                 IOP3XX_ISR_ALD | IOP3XX_ISR_BERRD |
98                 IOP3XX_ISR_RXFULL | IOP3XX_ISR_TXEMPTY;
99
100         cr |= IOP3XX_ICR_ALD_IE | IOP3XX_ICR_BERR_IE |
101                 IOP3XX_ICR_RXFULL_IE | IOP3XX_ICR_TXEMPTY_IE;
102
103         __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET);
104 }
105
106 static void 
107 iop3xx_i2c_transaction_cleanup(struct i2c_algo_iop3xx_data *iop3xx_adap)
108 {
109         unsigned long cr = __raw_readl(iop3xx_adap->ioaddr + CR_OFFSET);
110         
111         cr &= ~(IOP3XX_ICR_MSTART | IOP3XX_ICR_TBYTE | 
112                 IOP3XX_ICR_MSTOP | IOP3XX_ICR_SCLEN);
113
114         __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET);
115 }
116
117 /* 
118  * NB: the handler has to clear the source of the interrupt! 
119  * Then it passes the SR flags of interest to BH via adap data
120  */
121 static irqreturn_t 
122 iop3xx_i2c_irq_handler(int this_irq, void *dev_id) 
123 {
124         struct i2c_algo_iop3xx_data *iop3xx_adap = dev_id;
125         u32 sr = __raw_readl(iop3xx_adap->ioaddr + SR_OFFSET);
126
127         if ((sr &= iop3xx_adap->SR_enabled)) {
128                 __raw_writel(sr, iop3xx_adap->ioaddr + SR_OFFSET);
129                 iop3xx_adap->SR_received |= sr;
130                 wake_up_interruptible(&iop3xx_adap->waitq);
131         }
132         return IRQ_HANDLED;
133 }
134
135 /* check all error conditions, clear them , report most important */
136 static int 
137 iop3xx_i2c_error(u32 sr)
138 {
139         int rc = 0;
140
141         if ((sr & IOP3XX_ISR_BERRD)) {
142                 if ( !rc ) rc = -I2C_ERR_BERR;
143         }
144         if ((sr & IOP3XX_ISR_ALD)) {
145                 if ( !rc ) rc = -I2C_ERR_ALD;           
146         }
147         return rc;      
148 }
149
150 static inline u32 
151 iop3xx_i2c_get_srstat(struct i2c_algo_iop3xx_data *iop3xx_adap)
152 {
153         unsigned long flags;
154         u32 sr;
155
156         spin_lock_irqsave(&iop3xx_adap->lock, flags);
157         sr = iop3xx_adap->SR_received;
158         iop3xx_adap->SR_received = 0;
159         spin_unlock_irqrestore(&iop3xx_adap->lock, flags);
160
161         return sr;
162 }
163
164 /*
165  * sleep until interrupted, then recover and analyse the SR
166  * saved by handler
167  */
168 typedef int (* compare_func)(unsigned test, unsigned mask);
169 /* returns 1 on correct comparison */
170
171 static int 
172 iop3xx_i2c_wait_event(struct i2c_algo_iop3xx_data *iop3xx_adap, 
173                           unsigned flags, unsigned* status,
174                           compare_func compare)
175 {
176         unsigned sr = 0;
177         int interrupted;
178         int done;
179         int rc = 0;
180
181         do {
182                 interrupted = wait_event_interruptible_timeout (
183                         iop3xx_adap->waitq,
184                         (done = compare( sr = iop3xx_i2c_get_srstat(iop3xx_adap) ,flags )),
185                         1 * HZ;
186                         );
187                 if ((rc = iop3xx_i2c_error(sr)) < 0) {
188                         *status = sr;
189                         return rc;
190                 } else if (!interrupted) {
191                         *status = sr;
192                         return -ETIMEDOUT;
193                 }
194         } while(!done);
195
196         *status = sr;
197
198         return 0;
199 }
200
201 /*
202  * Concrete compare_funcs 
203  */
204 static int 
205 all_bits_clear(unsigned test, unsigned mask)
206 {
207         return (test & mask) == 0;
208 }
209
210 static int 
211 any_bits_set(unsigned test, unsigned mask)
212 {
213         return (test & mask) != 0;
214 }
215
216 static int 
217 iop3xx_i2c_wait_tx_done(struct i2c_algo_iop3xx_data *iop3xx_adap, int *status)
218 {
219         return iop3xx_i2c_wait_event( 
220                 iop3xx_adap, 
221                 IOP3XX_ISR_TXEMPTY | IOP3XX_ISR_ALD | IOP3XX_ISR_BERRD,
222                 status, any_bits_set);
223 }
224
225 static int 
226 iop3xx_i2c_wait_rx_done(struct i2c_algo_iop3xx_data *iop3xx_adap, int *status)
227 {
228         return iop3xx_i2c_wait_event( 
229                 iop3xx_adap, 
230                 IOP3XX_ISR_RXFULL | IOP3XX_ISR_ALD | IOP3XX_ISR_BERRD,
231                 status, any_bits_set);
232 }
233
234 static int 
235 iop3xx_i2c_wait_idle(struct i2c_algo_iop3xx_data *iop3xx_adap, int *status)
236 {
237         return iop3xx_i2c_wait_event( 
238                 iop3xx_adap, IOP3XX_ISR_UNITBUSY, status, all_bits_clear);
239 }
240
241 static int 
242 iop3xx_i2c_send_target_addr(struct i2c_algo_iop3xx_data *iop3xx_adap, 
243                                 struct i2c_msg* msg)
244 {
245         unsigned long cr = __raw_readl(iop3xx_adap->ioaddr + CR_OFFSET);
246         int status;
247         int rc;
248
249         /* avoid writing to my slave address (hangs on 80331),
250          * forbidden in Intel developer manual
251          */
252         if (msg->addr == MYSAR) {
253                 return -EBUSY;
254         }
255
256         __raw_writel(iic_cook_addr(msg), iop3xx_adap->ioaddr + DBR_OFFSET);
257         
258         cr &= ~(IOP3XX_ICR_MSTOP | IOP3XX_ICR_NACK);
259         cr |= IOP3XX_ICR_MSTART | IOP3XX_ICR_TBYTE;
260
261         __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET);
262         rc = iop3xx_i2c_wait_tx_done(iop3xx_adap, &status);
263
264         return rc;
265 }
266
267 static int 
268 iop3xx_i2c_write_byte(struct i2c_algo_iop3xx_data *iop3xx_adap, char byte, 
269                                 int stop)
270 {
271         unsigned long cr = __raw_readl(iop3xx_adap->ioaddr + CR_OFFSET);
272         int status;
273         int rc = 0;
274
275         __raw_writel(byte, iop3xx_adap->ioaddr + DBR_OFFSET);
276         cr &= ~IOP3XX_ICR_MSTART;
277         if (stop) {
278                 cr |= IOP3XX_ICR_MSTOP;
279         } else {
280                 cr &= ~IOP3XX_ICR_MSTOP;
281         }
282         cr |= IOP3XX_ICR_TBYTE;
283         __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET);
284         rc = iop3xx_i2c_wait_tx_done(iop3xx_adap, &status);
285
286         return rc;
287
288
289 static int 
290 iop3xx_i2c_read_byte(struct i2c_algo_iop3xx_data *iop3xx_adap, char* byte, 
291                                 int stop)
292 {
293         unsigned long cr = __raw_readl(iop3xx_adap->ioaddr + CR_OFFSET);
294         int status;
295         int rc = 0;
296
297         cr &= ~IOP3XX_ICR_MSTART;
298
299         if (stop) {
300                 cr |= IOP3XX_ICR_MSTOP | IOP3XX_ICR_NACK;
301         } else {
302                 cr &= ~(IOP3XX_ICR_MSTOP | IOP3XX_ICR_NACK);
303         }
304         cr |= IOP3XX_ICR_TBYTE;
305         __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET);
306
307         rc = iop3xx_i2c_wait_rx_done(iop3xx_adap, &status);
308
309         *byte = __raw_readl(iop3xx_adap->ioaddr + DBR_OFFSET);
310
311         return rc;
312 }
313
314 static int 
315 iop3xx_i2c_writebytes(struct i2c_adapter *i2c_adap, const char *buf, int count)
316 {
317         struct i2c_algo_iop3xx_data *iop3xx_adap = i2c_adap->algo_data;
318         int ii;
319         int rc = 0;
320
321         for (ii = 0; rc == 0 && ii != count; ++ii) 
322                 rc = iop3xx_i2c_write_byte(iop3xx_adap, buf[ii], ii==count-1);
323         return rc;
324 }
325
326 static int 
327 iop3xx_i2c_readbytes(struct i2c_adapter *i2c_adap, char *buf, int count)
328 {
329         struct i2c_algo_iop3xx_data *iop3xx_adap = i2c_adap->algo_data;
330         int ii;
331         int rc = 0;
332
333         for (ii = 0; rc == 0 && ii != count; ++ii)
334                 rc = iop3xx_i2c_read_byte(iop3xx_adap, &buf[ii], ii==count-1);
335         
336         return rc;
337 }
338
339 /*
340  * Description:  This function implements combined transactions.  Combined
341  * transactions consist of combinations of reading and writing blocks of data.
342  * FROM THE SAME ADDRESS
343  * Each transfer (i.e. a read or a write) is separated by a repeated start
344  * condition.
345  */
346 static int 
347 iop3xx_i2c_handle_msg(struct i2c_adapter *i2c_adap, struct i2c_msg* pmsg) 
348 {
349         struct i2c_algo_iop3xx_data *iop3xx_adap = i2c_adap->algo_data;
350         int rc;
351
352         rc = iop3xx_i2c_send_target_addr(iop3xx_adap, pmsg);
353         if (rc < 0) {
354                 return rc;
355         }
356
357         if ((pmsg->flags&I2C_M_RD)) {
358                 return iop3xx_i2c_readbytes(i2c_adap, pmsg->buf, pmsg->len);
359         } else {
360                 return iop3xx_i2c_writebytes(i2c_adap, pmsg->buf, pmsg->len);
361         }
362 }
363
364 /*
365  * master_xfer() - main read/write entry
366  */
367 static int 
368 iop3xx_i2c_master_xfer(struct i2c_adapter *i2c_adap, struct i2c_msg *msgs, 
369                                 int num)
370 {
371         struct i2c_algo_iop3xx_data *iop3xx_adap = i2c_adap->algo_data;
372         int im = 0;
373         int ret = 0;
374         int status;
375
376         iop3xx_i2c_wait_idle(iop3xx_adap, &status);
377         iop3xx_i2c_reset(iop3xx_adap);
378         iop3xx_i2c_enable(iop3xx_adap);
379
380         for (im = 0; ret == 0 && im != num; im++) {
381                 ret = iop3xx_i2c_handle_msg(i2c_adap, &msgs[im]);
382         }
383
384         iop3xx_i2c_transaction_cleanup(iop3xx_adap);
385         
386         if(ret)
387                 return ret;
388
389         return im;   
390 }
391
392 static u32 
393 iop3xx_i2c_func(struct i2c_adapter *adap)
394 {
395         return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL;
396 }
397
398 static const struct i2c_algorithm iop3xx_i2c_algo = {
399         .master_xfer    = iop3xx_i2c_master_xfer,
400         .functionality  = iop3xx_i2c_func,
401 };
402
403 static int 
404 iop3xx_i2c_remove(struct platform_device *pdev)
405 {
406         struct i2c_adapter *padapter = platform_get_drvdata(pdev);
407         struct i2c_algo_iop3xx_data *adapter_data = 
408                 (struct i2c_algo_iop3xx_data *)padapter->algo_data;
409         struct resource *res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
410         unsigned long cr = __raw_readl(adapter_data->ioaddr + CR_OFFSET);
411
412         /*
413          * Disable the actual HW unit
414          */
415         cr &= ~(IOP3XX_ICR_ALD_IE | IOP3XX_ICR_BERR_IE |
416                 IOP3XX_ICR_RXFULL_IE | IOP3XX_ICR_TXEMPTY_IE);
417         __raw_writel(cr, adapter_data->ioaddr + CR_OFFSET);
418
419         iounmap((void __iomem*)adapter_data->ioaddr);
420         release_mem_region(res->start, IOP3XX_I2C_IO_SIZE);
421         kfree(adapter_data);
422         kfree(padapter);
423
424         platform_set_drvdata(pdev, NULL);
425
426         return 0;
427 }
428
429 static int 
430 iop3xx_i2c_probe(struct platform_device *pdev)
431 {
432         struct resource *res;
433         int ret, irq;
434         struct i2c_adapter *new_adapter;
435         struct i2c_algo_iop3xx_data *adapter_data;
436
437         new_adapter = kzalloc(sizeof(struct i2c_adapter), GFP_KERNEL);
438         if (!new_adapter) {
439                 ret = -ENOMEM;
440                 goto out;
441         }
442
443         adapter_data = kzalloc(sizeof(struct i2c_algo_iop3xx_data), GFP_KERNEL);
444         if (!adapter_data) {
445                 ret = -ENOMEM;
446                 goto free_adapter;
447         }
448
449         res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
450         if (!res) {
451                 ret = -ENODEV;
452                 goto free_both;
453         }
454
455         if (!request_mem_region(res->start, IOP3XX_I2C_IO_SIZE, pdev->name)) {
456                 ret = -EBUSY;
457                 goto free_both;
458         }
459
460         /* set the adapter enumeration # */
461         adapter_data->id = i2c_id++;
462
463         adapter_data->ioaddr = (u32)ioremap(res->start, IOP3XX_I2C_IO_SIZE);
464         if (!adapter_data->ioaddr) {
465                 ret = -ENOMEM;
466                 goto release_region;
467         }
468
469         irq = platform_get_irq(pdev, 0);
470         if (irq < 0) {
471                 ret = -ENXIO;
472                 goto unmap;
473         }
474         ret = request_irq(irq, iop3xx_i2c_irq_handler, 0,
475                                 pdev->name, adapter_data);
476
477         if (ret) {
478                 ret = -EIO;
479                 goto unmap;
480         }
481
482         memcpy(new_adapter->name, pdev->name, strlen(pdev->name));
483         new_adapter->owner = THIS_MODULE;
484         new_adapter->class = I2C_CLASS_HWMON | I2C_CLASS_SPD;
485         new_adapter->dev.parent = &pdev->dev;
486         new_adapter->nr = pdev->id;
487
488         /*
489          * Default values...should these come in from board code?
490          */
491         new_adapter->timeout = HZ;
492         new_adapter->algo = &iop3xx_i2c_algo;
493
494         init_waitqueue_head(&adapter_data->waitq);
495         spin_lock_init(&adapter_data->lock);
496
497         iop3xx_i2c_reset(adapter_data);
498         iop3xx_i2c_enable(adapter_data);
499
500         platform_set_drvdata(pdev, new_adapter);
501         new_adapter->algo_data = adapter_data;
502
503         i2c_add_numbered_adapter(new_adapter);
504
505         return 0;
506
507 unmap:
508         iounmap((void __iomem*)adapter_data->ioaddr);
509
510 release_region:
511         release_mem_region(res->start, IOP3XX_I2C_IO_SIZE);
512
513 free_both:
514         kfree(adapter_data);
515
516 free_adapter:
517         kfree(new_adapter);
518
519 out:
520         return ret;
521 }
522
523
524 static struct platform_driver iop3xx_i2c_driver = {
525         .probe          = iop3xx_i2c_probe,
526         .remove         = iop3xx_i2c_remove,
527         .driver         = {
528                 .owner  = THIS_MODULE,
529                 .name   = "IOP3xx-I2C",
530         },
531 };
532
533 static int __init 
534 i2c_iop3xx_init (void)
535 {
536         return platform_driver_register(&iop3xx_i2c_driver);
537 }
538
539 static void __exit 
540 i2c_iop3xx_exit (void)
541 {
542         platform_driver_unregister(&iop3xx_i2c_driver);
543         return;
544 }
545
546 module_init (i2c_iop3xx_init);
547 module_exit (i2c_iop3xx_exit);
548
549 MODULE_AUTHOR("D-TACQ Solutions Ltd <www.d-tacq.com>");
550 MODULE_DESCRIPTION("IOP3xx iic algorithm and driver");
551 MODULE_LICENSE("GPL");
552 MODULE_ALIAS("platform:IOP3xx-I2C");