1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30#undef DEBUG
31#undef DEBUG_LOW
32
33#include <linux/types.h>
34#include <linux/sched.h>
35#include <linux/init.h>
36#include <linux/module.h>
37#include <linux/adb.h>
38#include <linux/pmu.h>
39#include <linux/delay.h>
40#include <linux/completion.h>
41#include <linux/platform_device.h>
42#include <linux/interrupt.h>
43#include <linux/timer.h>
44#include <linux/mutex.h>
45#include <linux/i2c.h>
46#include <linux/slab.h>
47#include <asm/keylargo.h>
48#include <asm/uninorth.h>
49#include <asm/io.h>
50#include <asm/prom.h>
51#include <asm/machdep.h>
52#include <asm/smu.h>
53#include <asm/pmac_pfunc.h>
54#include <asm/pmac_low_i2c.h>
55
56#ifdef DEBUG
57#define DBG(x...) do {\
58 printk(KERN_DEBUG "low_i2c:" x); \
59 } while(0)
60#else
61#define DBG(x...)
62#endif
63
64#ifdef DEBUG_LOW
65#define DBG_LOW(x...) do {\
66 printk(KERN_DEBUG "low_i2c:" x); \
67 } while(0)
68#else
69#define DBG_LOW(x...)
70#endif
71
72
73static int pmac_i2c_force_poll = 1;
74
75
76
77
78struct pmac_i2c_bus
79{
80 struct list_head link;
81 struct device_node *controller;
82 struct device_node *busnode;
83 int type;
84 int flags;
85 struct i2c_adapter adapter;
86 void *hostdata;
87 int channel;
88 int mode;
89 struct mutex mutex;
90 int opened;
91 int polled;
92 struct platform_device *platform_dev;
93
94
95 int (*open)(struct pmac_i2c_bus *bus);
96 void (*close)(struct pmac_i2c_bus *bus);
97 int (*xfer)(struct pmac_i2c_bus *bus, u8 addrdir, int subsize,
98 u32 subaddr, u8 *data, int len);
99};
100
101static LIST_HEAD(pmac_i2c_busses);
102
103
104
105
106
107struct pmac_i2c_host_kw
108{
109 struct mutex mutex;
110
111 void __iomem *base;
112 int bsteps;
113 int speed;
114 int irq;
115 u8 *data;
116 unsigned len;
117 int state;
118 int rw;
119 int polled;
120 int result;
121 struct completion complete;
122 spinlock_t lock;
123 struct timer_list timeout_timer;
124};
125
126
127typedef enum {
128 reg_mode = 0,
129 reg_control,
130 reg_status,
131 reg_isr,
132 reg_ier,
133 reg_addr,
134 reg_subaddr,
135 reg_data
136} reg_t;
137
138
139#define KW_POLL_TIMEOUT (2*HZ)
140
141
142#define KW_I2C_MODE_100KHZ 0x00
143#define KW_I2C_MODE_50KHZ 0x01
144#define KW_I2C_MODE_25KHZ 0x02
145#define KW_I2C_MODE_DUMB 0x00
146#define KW_I2C_MODE_STANDARD 0x04
147#define KW_I2C_MODE_STANDARDSUB 0x08
148#define KW_I2C_MODE_COMBINED 0x0C
149#define KW_I2C_MODE_MODE_MASK 0x0C
150#define KW_I2C_MODE_CHAN_MASK 0xF0
151
152
153#define KW_I2C_CTL_AAK 0x01
154#define KW_I2C_CTL_XADDR 0x02
155#define KW_I2C_CTL_STOP 0x04
156#define KW_I2C_CTL_START 0x08
157
158
159#define KW_I2C_STAT_BUSY 0x01
160#define KW_I2C_STAT_LAST_AAK 0x02
161#define KW_I2C_STAT_LAST_RW 0x04
162#define KW_I2C_STAT_SDA 0x08
163#define KW_I2C_STAT_SCL 0x10
164
165
166#define KW_I2C_IRQ_DATA 0x01
167#define KW_I2C_IRQ_ADDR 0x02
168#define KW_I2C_IRQ_STOP 0x04
169#define KW_I2C_IRQ_START 0x08
170#define KW_I2C_IRQ_MASK 0x0F
171
172
173enum {
174 state_idle,
175 state_addr,
176 state_read,
177 state_write,
178 state_stop,
179 state_dead
180};
181
182#define WRONG_STATE(name) do {\
183 printk(KERN_DEBUG "KW: wrong state. Got %s, state: %s " \
184 "(isr: %02x)\n", \
185 name, __kw_state_names[host->state], isr); \
186 } while(0)
187
188static const char *__kw_state_names[] = {
189 "state_idle",
190 "state_addr",
191 "state_read",
192 "state_write",
193 "state_stop",
194 "state_dead"
195};
196
197static inline u8 __kw_read_reg(struct pmac_i2c_host_kw *host, reg_t reg)
198{
199 return readb(host->base + (((unsigned int)reg) << host->bsteps));
200}
201
202static inline void __kw_write_reg(struct pmac_i2c_host_kw *host,
203 reg_t reg, u8 val)
204{
205 writeb(val, host->base + (((unsigned)reg) << host->bsteps));
206 (void)__kw_read_reg(host, reg_subaddr);
207}
208
209#define kw_write_reg(reg, val) __kw_write_reg(host, reg, val)
210#define kw_read_reg(reg) __kw_read_reg(host, reg)
211
212static u8 kw_i2c_wait_interrupt(struct pmac_i2c_host_kw *host)
213{
214 int i, j;
215 u8 isr;
216
217 for (i = 0; i < 1000; i++) {
218 isr = kw_read_reg(reg_isr) & KW_I2C_IRQ_MASK;
219 if (isr != 0)
220 return isr;
221
222
223
224
225
226 if (host->polled) {
227 for (j = 1; j < 100000; j++)
228 mb();
229 } else
230 msleep(1);
231 }
232 return isr;
233}
234
235static void kw_i2c_do_stop(struct pmac_i2c_host_kw *host, int result)
236{
237 kw_write_reg(reg_control, KW_I2C_CTL_STOP);
238 host->state = state_stop;
239 host->result = result;
240}
241
242
243static void kw_i2c_handle_interrupt(struct pmac_i2c_host_kw *host, u8 isr)
244{
245 u8 ack;
246
247 DBG_LOW("kw_handle_interrupt(%s, isr: %x)\n",
248 __kw_state_names[host->state], isr);
249
250 if (host->state == state_idle) {
251 printk(KERN_WARNING "low_i2c: Keywest got an out of state"
252 " interrupt, ignoring\n");
253 kw_write_reg(reg_isr, isr);
254 return;
255 }
256
257 if (isr == 0) {
258 printk(KERN_WARNING "low_i2c: Timeout in i2c transfer"
259 " on keywest !\n");
260 if (host->state != state_stop) {
261 kw_i2c_do_stop(host, -EIO);
262 return;
263 }
264 ack = kw_read_reg(reg_status);
265 if (ack & KW_I2C_STAT_BUSY)
266 kw_write_reg(reg_status, 0);
267 host->state = state_idle;
268 kw_write_reg(reg_ier, 0x00);
269 if (!host->polled)
270 complete(&host->complete);
271 return;
272 }
273
274 if (isr & KW_I2C_IRQ_ADDR) {
275 ack = kw_read_reg(reg_status);
276 if (host->state != state_addr) {
277 WRONG_STATE("KW_I2C_IRQ_ADDR");
278 kw_i2c_do_stop(host, -EIO);
279 }
280 if ((ack & KW_I2C_STAT_LAST_AAK) == 0) {
281 host->result = -ENXIO;
282 host->state = state_stop;
283 DBG_LOW("KW: NAK on address\n");
284 } else {
285 if (host->len == 0)
286 kw_i2c_do_stop(host, 0);
287 else if (host->rw) {
288 host->state = state_read;
289 if (host->len > 1)
290 kw_write_reg(reg_control,
291 KW_I2C_CTL_AAK);
292 } else {
293 host->state = state_write;
294 kw_write_reg(reg_data, *(host->data++));
295 host->len--;
296 }
297 }
298 kw_write_reg(reg_isr, KW_I2C_IRQ_ADDR);
299 }
300
301 if (isr & KW_I2C_IRQ_DATA) {
302 if (host->state == state_read) {
303 *(host->data++) = kw_read_reg(reg_data);
304 host->len--;
305 kw_write_reg(reg_isr, KW_I2C_IRQ_DATA);
306 if (host->len == 0)
307 host->state = state_stop;
308 else if (host->len == 1)
309 kw_write_reg(reg_control, 0);
310 } else if (host->state == state_write) {
311 ack = kw_read_reg(reg_status);
312 if ((ack & KW_I2C_STAT_LAST_AAK) == 0) {
313 DBG_LOW("KW: nack on data write\n");
314 host->result = -EFBIG;
315 host->state = state_stop;
316 } else if (host->len) {
317 kw_write_reg(reg_data, *(host->data++));
318 host->len--;
319 } else
320 kw_i2c_do_stop(host, 0);
321 } else {
322 WRONG_STATE("KW_I2C_IRQ_DATA");
323 if (host->state != state_stop)
324 kw_i2c_do_stop(host, -EIO);
325 }
326 kw_write_reg(reg_isr, KW_I2C_IRQ_DATA);
327 }
328
329 if (isr & KW_I2C_IRQ_STOP) {
330 kw_write_reg(reg_isr, KW_I2C_IRQ_STOP);
331 if (host->state != state_stop) {
332 WRONG_STATE("KW_I2C_IRQ_STOP");
333 host->result = -EIO;
334 }
335 host->state = state_idle;
336 if (!host->polled)
337 complete(&host->complete);
338 }
339
340
341 if (isr & KW_I2C_IRQ_START)
342 kw_write_reg(reg_isr, KW_I2C_IRQ_START);
343
344}
345
346
347static irqreturn_t kw_i2c_irq(int irq, void *dev_id)
348{
349 struct pmac_i2c_host_kw *host = dev_id;
350 unsigned long flags;
351
352 spin_lock_irqsave(&host->lock, flags);
353 del_timer(&host->timeout_timer);
354 kw_i2c_handle_interrupt(host, kw_read_reg(reg_isr));
355 if (host->state != state_idle) {
356 host->timeout_timer.expires = jiffies + KW_POLL_TIMEOUT;
357 add_timer(&host->timeout_timer);
358 }
359 spin_unlock_irqrestore(&host->lock, flags);
360 return IRQ_HANDLED;
361}
362
363static void kw_i2c_timeout(unsigned long data)
364{
365 struct pmac_i2c_host_kw *host = (struct pmac_i2c_host_kw *)data;
366 unsigned long flags;
367
368 spin_lock_irqsave(&host->lock, flags);
369 kw_i2c_handle_interrupt(host, kw_read_reg(reg_isr));
370 if (host->state != state_idle) {
371 host->timeout_timer.expires = jiffies + KW_POLL_TIMEOUT;
372 add_timer(&host->timeout_timer);
373 }
374 spin_unlock_irqrestore(&host->lock, flags);
375}
376
377static int kw_i2c_open(struct pmac_i2c_bus *bus)
378{
379 struct pmac_i2c_host_kw *host = bus->hostdata;
380 mutex_lock(&host->mutex);
381 return 0;
382}
383
384static void kw_i2c_close(struct pmac_i2c_bus *bus)
385{
386 struct pmac_i2c_host_kw *host = bus->hostdata;
387 mutex_unlock(&host->mutex);
388}
389
390static int kw_i2c_xfer(struct pmac_i2c_bus *bus, u8 addrdir, int subsize,
391 u32 subaddr, u8 *data, int len)
392{
393 struct pmac_i2c_host_kw *host = bus->hostdata;
394 u8 mode_reg = host->speed;
395 int use_irq = host->irq != NO_IRQ && !bus->polled;
396
397
398 switch(bus->mode) {
399 case pmac_i2c_mode_dumb:
400 return -EINVAL;
401 case pmac_i2c_mode_std:
402 mode_reg |= KW_I2C_MODE_STANDARD;
403 if (subsize != 0)
404 return -EINVAL;
405 break;
406 case pmac_i2c_mode_stdsub:
407 mode_reg |= KW_I2C_MODE_STANDARDSUB;
408 if (subsize != 1)
409 return -EINVAL;
410 break;
411 case pmac_i2c_mode_combined:
412 mode_reg |= KW_I2C_MODE_COMBINED;
413 if (subsize != 1)
414 return -EINVAL;
415 break;
416 }
417
418
419 kw_write_reg(reg_isr, kw_read_reg(reg_isr));
420 kw_write_reg(reg_mode, mode_reg | (bus->channel << 4));
421 kw_write_reg(reg_status, 0);
422
423
424
425
426 kw_write_reg(reg_addr, addrdir & 0xff);
427
428
429 if ((mode_reg & KW_I2C_MODE_MODE_MASK) == KW_I2C_MODE_STANDARDSUB
430 || (mode_reg & KW_I2C_MODE_MODE_MASK) == KW_I2C_MODE_COMBINED)
431 kw_write_reg(reg_subaddr, subaddr);
432
433
434 host->data = data;
435 host->len = len;
436 host->state = state_addr;
437 host->result = 0;
438 host->rw = (addrdir & 1);
439 host->polled = bus->polled;
440
441
442
443
444 if (use_irq) {
445
446 INIT_COMPLETION(host->complete);
447
448 kw_write_reg(reg_isr, kw_read_reg(reg_isr));
449
450 host->timeout_timer.expires = jiffies + KW_POLL_TIMEOUT;
451 add_timer(&host->timeout_timer);
452
453 kw_write_reg(reg_ier, KW_I2C_IRQ_MASK);
454 }
455
456
457 kw_write_reg(reg_control, KW_I2C_CTL_XADDR);
458
459
460 if (use_irq)
461 wait_for_completion(&host->complete);
462 else {
463 while(host->state != state_idle) {
464 unsigned long flags;
465
466 u8 isr = kw_i2c_wait_interrupt(host);
467 spin_lock_irqsave(&host->lock, flags);
468 kw_i2c_handle_interrupt(host, isr);
469 spin_unlock_irqrestore(&host->lock, flags);
470 }
471 }
472
473
474 kw_write_reg(reg_ier, 0);
475
476 return host->result;
477}
478
479static struct pmac_i2c_host_kw *__init kw_i2c_host_init(struct device_node *np)
480{
481 struct pmac_i2c_host_kw *host;
482 const u32 *psteps, *prate, *addrp;
483 u32 steps;
484
485 host = kzalloc(sizeof(struct pmac_i2c_host_kw), GFP_KERNEL);
486 if (host == NULL) {
487 printk(KERN_ERR "low_i2c: Can't allocate host for %s\n",
488 np->full_name);
489 return NULL;
490 }
491
492
493
494
495
496 addrp = of_get_property(np, "AAPL,address", NULL);
497 if (addrp == NULL) {
498 printk(KERN_ERR "low_i2c: Can't find address for %s\n",
499 np->full_name);
500 kfree(host);
501 return NULL;
502 }
503 mutex_init(&host->mutex);
504 init_completion(&host->complete);
505 spin_lock_init(&host->lock);
506 init_timer(&host->timeout_timer);
507 host->timeout_timer.function = kw_i2c_timeout;
508 host->timeout_timer.data = (unsigned long)host;
509
510 psteps = of_get_property(np, "AAPL,address-step", NULL);
511 steps = psteps ? (*psteps) : 0x10;
512 for (host->bsteps = 0; (steps & 0x01) == 0; host->bsteps++)
513 steps >>= 1;
514
515 host->speed = KW_I2C_MODE_25KHZ;
516 prate = of_get_property(np, "AAPL,i2c-rate", NULL);
517 if (prate) switch(*prate) {
518 case 100:
519 host->speed = KW_I2C_MODE_100KHZ;
520 break;
521 case 50:
522 host->speed = KW_I2C_MODE_50KHZ;
523 break;
524 case 25:
525 host->speed = KW_I2C_MODE_25KHZ;
526 break;
527 }
528 host->irq = irq_of_parse_and_map(np, 0);
529 if (host->irq == NO_IRQ)
530 printk(KERN_WARNING
531 "low_i2c: Failed to map interrupt for %s\n",
532 np->full_name);
533
534 host->base = ioremap((*addrp), 0x1000);
535 if (host->base == NULL) {
536 printk(KERN_ERR "low_i2c: Can't map registers for %s\n",
537 np->full_name);
538 kfree(host);
539 return NULL;
540 }
541
542
543 kw_write_reg(reg_ier, 0);
544
545
546
547
548
549 if (request_irq(host->irq, kw_i2c_irq, IRQF_NO_SUSPEND,
550 "keywest i2c", host))
551 host->irq = NO_IRQ;
552
553 printk(KERN_INFO "KeyWest i2c @0x%08x irq %d %s\n",
554 *addrp, host->irq, np->full_name);
555
556 return host;
557}
558
559
560static void __init kw_i2c_add(struct pmac_i2c_host_kw *host,
561 struct device_node *controller,
562 struct device_node *busnode,
563 int channel)
564{
565 struct pmac_i2c_bus *bus;
566
567 bus = kzalloc(sizeof(struct pmac_i2c_bus), GFP_KERNEL);
568 if (bus == NULL)
569 return;
570
571 bus->controller = of_node_get(controller);
572 bus->busnode = of_node_get(busnode);
573 bus->type = pmac_i2c_bus_keywest;
574 bus->hostdata = host;
575 bus->channel = channel;
576 bus->mode = pmac_i2c_mode_std;
577 bus->open = kw_i2c_open;
578 bus->close = kw_i2c_close;
579 bus->xfer = kw_i2c_xfer;
580 mutex_init(&bus->mutex);
581 if (controller == busnode)
582 bus->flags = pmac_i2c_multibus;
583 list_add(&bus->link, &pmac_i2c_busses);
584
585 printk(KERN_INFO " channel %d bus %s\n", channel,
586 (controller == busnode) ? "<multibus>" : busnode->full_name);
587}
588
589static void __init kw_i2c_probe(void)
590{
591 struct device_node *np, *child, *parent;
592
593
594 for_each_compatible_node(np, "i2c","keywest-i2c") {
595 struct pmac_i2c_host_kw *host;
596 int multibus;
597
598
599 host = kw_i2c_host_init(np);
600 if (host == NULL)
601 continue;
602
603
604
605
606
607
608
609
610 child = of_get_next_child(np, NULL);
611 multibus = !child || strcmp(child->name, "i2c-bus");
612 of_node_put(child);
613
614
615
616
617 if (multibus) {
618 int chans, i;
619
620 parent = of_get_parent(np);
621 if (parent == NULL)
622 continue;
623 chans = parent->name[0] == 'u' ? 2 : 1;
624 for (i = 0; i < chans; i++)
625 kw_i2c_add(host, np, np, i);
626 } else {
627 for (child = NULL;
628 (child = of_get_next_child(np, child)) != NULL;) {
629 const u32 *reg = of_get_property(child,
630 "reg", NULL);
631 if (reg == NULL)
632 continue;
633 kw_i2c_add(host, np, child, *reg);
634 }
635 }
636 }
637}
638
639
640
641
642
643
644
645
646#ifdef CONFIG_ADB_PMU
647
648
649
650
651struct pmu_i2c_hdr {
652 u8 bus;
653 u8 mode;
654 u8 bus2;
655 u8 address;
656 u8 sub_addr;
657 u8 comb_addr;
658 u8 count;
659 u8 data[];
660};
661
662static void pmu_i2c_complete(struct adb_request *req)
663{
664 complete(req->arg);
665}
666
667static int pmu_i2c_xfer(struct pmac_i2c_bus *bus, u8 addrdir, int subsize,
668 u32 subaddr, u8 *data, int len)
669{
670 struct adb_request *req = bus->hostdata;
671 struct pmu_i2c_hdr *hdr = (struct pmu_i2c_hdr *)&req->data[1];
672 struct completion comp;
673 int read = addrdir & 1;
674 int retry;
675 int rc = 0;
676
677
678 if (len > 16)
679 return -EINVAL;
680
681 init_completion(&comp);
682
683 for (retry = 0; retry < 16; retry++) {
684 memset(req, 0, sizeof(struct adb_request));
685 hdr->bus = bus->channel;
686 hdr->count = len;
687
688 switch(bus->mode) {
689 case pmac_i2c_mode_std:
690 if (subsize != 0)
691 return -EINVAL;
692 hdr->address = addrdir;
693 hdr->mode = PMU_I2C_MODE_SIMPLE;
694 break;
695 case pmac_i2c_mode_stdsub:
696 case pmac_i2c_mode_combined:
697 if (subsize != 1)
698 return -EINVAL;
699 hdr->address = addrdir & 0xfe;
700 hdr->comb_addr = addrdir;
701 hdr->sub_addr = subaddr;
702 if (bus->mode == pmac_i2c_mode_stdsub)
703 hdr->mode = PMU_I2C_MODE_STDSUB;
704 else
705 hdr->mode = PMU_I2C_MODE_COMBINED;
706 break;
707 default:
708 return -EINVAL;
709 }
710
711 INIT_COMPLETION(comp);
712 req->data[0] = PMU_I2C_CMD;
713 req->reply[0] = 0xff;
714 req->nbytes = sizeof(struct pmu_i2c_hdr) + 1;
715 req->done = pmu_i2c_complete;
716 req->arg = ∁
717 if (!read && len) {
718 memcpy(hdr->data, data, len);
719 req->nbytes += len;
720 }
721 rc = pmu_queue_request(req);
722 if (rc)
723 return rc;
724 wait_for_completion(&comp);
725 if (req->reply[0] == PMU_I2C_STATUS_OK)
726 break;
727 msleep(15);
728 }
729 if (req->reply[0] != PMU_I2C_STATUS_OK)
730 return -EIO;
731
732 for (retry = 0; retry < 16; retry++) {
733 memset(req, 0, sizeof(struct adb_request));
734
735
736
737
738 msleep(15);
739
740 hdr->bus = PMU_I2C_BUS_STATUS;
741
742 INIT_COMPLETION(comp);
743 req->data[0] = PMU_I2C_CMD;
744 req->reply[0] = 0xff;
745 req->nbytes = 2;
746 req->done = pmu_i2c_complete;
747 req->arg = ∁
748 rc = pmu_queue_request(req);
749 if (rc)
750 return rc;
751 wait_for_completion(&comp);
752
753 if (req->reply[0] == PMU_I2C_STATUS_OK && !read)
754 return 0;
755 if (req->reply[0] == PMU_I2C_STATUS_DATAREAD && read) {
756 int rlen = req->reply_len - 1;
757
758 if (rlen != len) {
759 printk(KERN_WARNING "low_i2c: PMU returned %d"
760 " bytes, expected %d !\n", rlen, len);
761 return -EIO;
762 }
763 if (len)
764 memcpy(data, &req->reply[1], len);
765 return 0;
766 }
767 }
768 return -EIO;
769}
770
771static void __init pmu_i2c_probe(void)
772{
773 struct pmac_i2c_bus *bus;
774 struct device_node *busnode;
775 int channel, sz;
776
777 if (!pmu_present())
778 return;
779
780
781
782
783
784 busnode = of_find_node_by_name(NULL, "pmu-i2c");
785 if (busnode == NULL)
786 busnode = of_find_node_by_name(NULL, "via-pmu");
787 if (busnode == NULL)
788 return;
789
790 printk(KERN_INFO "PMU i2c %s\n", busnode->full_name);
791
792
793
794
795 for (channel = 1; channel <= 2; channel++) {
796 sz = sizeof(struct pmac_i2c_bus) + sizeof(struct adb_request);
797 bus = kzalloc(sz, GFP_KERNEL);
798 if (bus == NULL)
799 return;
800
801 bus->controller = busnode;
802 bus->busnode = busnode;
803 bus->type = pmac_i2c_bus_pmu;
804 bus->channel = channel;
805 bus->mode = pmac_i2c_mode_std;
806 bus->hostdata = bus + 1;
807 bus->xfer = pmu_i2c_xfer;
808 mutex_init(&bus->mutex);
809 bus->flags = pmac_i2c_multibus;
810 list_add(&bus->link, &pmac_i2c_busses);
811
812 printk(KERN_INFO " channel %d bus <multibus>\n", channel);
813 }
814}
815
816#endif
817
818
819
820
821
822
823
824
825#ifdef CONFIG_PMAC_SMU
826
827static void smu_i2c_complete(struct smu_i2c_cmd *cmd, void *misc)
828{
829 complete(misc);
830}
831
832static int smu_i2c_xfer(struct pmac_i2c_bus *bus, u8 addrdir, int subsize,
833 u32 subaddr, u8 *data, int len)
834{
835 struct smu_i2c_cmd *cmd = bus->hostdata;
836 struct completion comp;
837 int read = addrdir & 1;
838 int rc = 0;
839
840 if ((read && len > SMU_I2C_READ_MAX) ||
841 ((!read) && len > SMU_I2C_WRITE_MAX))
842 return -EINVAL;
843
844 memset(cmd, 0, sizeof(struct smu_i2c_cmd));
845 cmd->info.bus = bus->channel;
846 cmd->info.devaddr = addrdir;
847 cmd->info.datalen = len;
848
849 switch(bus->mode) {
850 case pmac_i2c_mode_std:
851 if (subsize != 0)
852 return -EINVAL;
853 cmd->info.type = SMU_I2C_TRANSFER_SIMPLE;
854 break;
855 case pmac_i2c_mode_stdsub:
856 case pmac_i2c_mode_combined:
857 if (subsize > 3 || subsize < 1)
858 return -EINVAL;
859 cmd->info.sublen = subsize;
860
861 memcpy(&cmd->info.subaddr, ((char *)&subaddr) + (4 - subsize),
862 subsize);
863 if (bus->mode == pmac_i2c_mode_stdsub)
864 cmd->info.type = SMU_I2C_TRANSFER_STDSUB;
865 else
866 cmd->info.type = SMU_I2C_TRANSFER_COMBINED;
867 break;
868 default:
869 return -EINVAL;
870 }
871 if (!read && len)
872 memcpy(cmd->info.data, data, len);
873
874 init_completion(&comp);
875 cmd->done = smu_i2c_complete;
876 cmd->misc = ∁
877 rc = smu_queue_i2c(cmd);
878 if (rc < 0)
879 return rc;
880 wait_for_completion(&comp);
881 rc = cmd->status;
882
883 if (read && len)
884 memcpy(data, cmd->info.data, len);
885 return rc < 0 ? rc : 0;
886}
887
888static void __init smu_i2c_probe(void)
889{
890 struct device_node *controller, *busnode;
891 struct pmac_i2c_bus *bus;
892 const u32 *reg;
893 int sz;
894
895 if (!smu_present())
896 return;
897
898 controller = of_find_node_by_name(NULL, "smu-i2c-control");
899 if (controller == NULL)
900 controller = of_find_node_by_name(NULL, "smu");
901 if (controller == NULL)
902 return;
903
904 printk(KERN_INFO "SMU i2c %s\n", controller->full_name);
905
906
907
908
909
910 for (busnode = NULL;
911 (busnode = of_get_next_child(controller, busnode)) != NULL;) {
912 if (strcmp(busnode->type, "i2c") &&
913 strcmp(busnode->type, "i2c-bus"))
914 continue;
915 reg = of_get_property(busnode, "reg", NULL);
916 if (reg == NULL)
917 continue;
918
919 sz = sizeof(struct pmac_i2c_bus) + sizeof(struct smu_i2c_cmd);
920 bus = kzalloc(sz, GFP_KERNEL);
921 if (bus == NULL)
922 return;
923
924 bus->controller = controller;
925 bus->busnode = of_node_get(busnode);
926 bus->type = pmac_i2c_bus_smu;
927 bus->channel = *reg;
928 bus->mode = pmac_i2c_mode_std;
929 bus->hostdata = bus + 1;
930 bus->xfer = smu_i2c_xfer;
931 mutex_init(&bus->mutex);
932 bus->flags = 0;
933 list_add(&bus->link, &pmac_i2c_busses);
934
935 printk(KERN_INFO " channel %x bus %s\n",
936 bus->channel, busnode->full_name);
937 }
938}
939
940#endif
941
942
943
944
945
946
947
948
949struct pmac_i2c_bus *pmac_i2c_find_bus(struct device_node *node)
950{
951 struct device_node *p = of_node_get(node);
952 struct device_node *prev = NULL;
953 struct pmac_i2c_bus *bus;
954
955 while(p) {
956 list_for_each_entry(bus, &pmac_i2c_busses, link) {
957 if (p == bus->busnode) {
958 if (prev && bus->flags & pmac_i2c_multibus) {
959 const u32 *reg;
960 reg = of_get_property(prev, "reg",
961 NULL);
962 if (!reg)
963 continue;
964 if (((*reg) >> 8) != bus->channel)
965 continue;
966 }
967 of_node_put(p);
968 of_node_put(prev);
969 return bus;
970 }
971 }
972 of_node_put(prev);
973 prev = p;
974 p = of_get_parent(p);
975 }
976 return NULL;
977}
978EXPORT_SYMBOL_GPL(pmac_i2c_find_bus);
979
980u8 pmac_i2c_get_dev_addr(struct device_node *device)
981{
982 const u32 *reg = of_get_property(device, "reg", NULL);
983
984 if (reg == NULL)
985 return 0;
986
987 return (*reg) & 0xff;
988}
989EXPORT_SYMBOL_GPL(pmac_i2c_get_dev_addr);
990
991struct device_node *pmac_i2c_get_controller(struct pmac_i2c_bus *bus)
992{
993 return bus->controller;
994}
995EXPORT_SYMBOL_GPL(pmac_i2c_get_controller);
996
997struct device_node *pmac_i2c_get_bus_node(struct pmac_i2c_bus *bus)
998{
999 return bus->busnode;
1000}
1001EXPORT_SYMBOL_GPL(pmac_i2c_get_bus_node);
1002
1003int pmac_i2c_get_type(struct pmac_i2c_bus *bus)
1004{
1005 return bus->type;
1006}
1007EXPORT_SYMBOL_GPL(pmac_i2c_get_type);
1008
1009int pmac_i2c_get_flags(struct pmac_i2c_bus *bus)
1010{
1011 return bus->flags;
1012}
1013EXPORT_SYMBOL_GPL(pmac_i2c_get_flags);
1014
1015int pmac_i2c_get_channel(struct pmac_i2c_bus *bus)
1016{
1017 return bus->channel;
1018}
1019EXPORT_SYMBOL_GPL(pmac_i2c_get_channel);
1020
1021
1022struct i2c_adapter *pmac_i2c_get_adapter(struct pmac_i2c_bus *bus)
1023{
1024 return &bus->adapter;
1025}
1026EXPORT_SYMBOL_GPL(pmac_i2c_get_adapter);
1027
1028struct pmac_i2c_bus *pmac_i2c_adapter_to_bus(struct i2c_adapter *adapter)
1029{
1030 struct pmac_i2c_bus *bus;
1031
1032 list_for_each_entry(bus, &pmac_i2c_busses, link)
1033 if (&bus->adapter == adapter)
1034 return bus;
1035 return NULL;
1036}
1037EXPORT_SYMBOL_GPL(pmac_i2c_adapter_to_bus);
1038
1039int pmac_i2c_match_adapter(struct device_node *dev, struct i2c_adapter *adapter)
1040{
1041 struct pmac_i2c_bus *bus = pmac_i2c_find_bus(dev);
1042
1043 if (bus == NULL)
1044 return 0;
1045 return (&bus->adapter == adapter);
1046}
1047EXPORT_SYMBOL_GPL(pmac_i2c_match_adapter);
1048
1049int pmac_low_i2c_lock(struct device_node *np)
1050{
1051 struct pmac_i2c_bus *bus, *found = NULL;
1052
1053 list_for_each_entry(bus, &pmac_i2c_busses, link) {
1054 if (np == bus->controller) {
1055 found = bus;
1056 break;
1057 }
1058 }
1059 if (!found)
1060 return -ENODEV;
1061 return pmac_i2c_open(bus, 0);
1062}
1063EXPORT_SYMBOL_GPL(pmac_low_i2c_lock);
1064
1065int pmac_low_i2c_unlock(struct device_node *np)
1066{
1067 struct pmac_i2c_bus *bus, *found = NULL;
1068
1069 list_for_each_entry(bus, &pmac_i2c_busses, link) {
1070 if (np == bus->controller) {
1071 found = bus;
1072 break;
1073 }
1074 }
1075 if (!found)
1076 return -ENODEV;
1077 pmac_i2c_close(bus);
1078 return 0;
1079}
1080EXPORT_SYMBOL_GPL(pmac_low_i2c_unlock);
1081
1082
1083int pmac_i2c_open(struct pmac_i2c_bus *bus, int polled)
1084{
1085 int rc;
1086
1087 mutex_lock(&bus->mutex);
1088 bus->polled = polled || pmac_i2c_force_poll;
1089 bus->opened = 1;
1090 bus->mode = pmac_i2c_mode_std;
1091 if (bus->open && (rc = bus->open(bus)) != 0) {
1092 bus->opened = 0;
1093 mutex_unlock(&bus->mutex);
1094 return rc;
1095 }
1096 return 0;
1097}
1098EXPORT_SYMBOL_GPL(pmac_i2c_open);
1099
1100void pmac_i2c_close(struct pmac_i2c_bus *bus)
1101{
1102 WARN_ON(!bus->opened);
1103 if (bus->close)
1104 bus->close(bus);
1105 bus->opened = 0;
1106 mutex_unlock(&bus->mutex);
1107}
1108EXPORT_SYMBOL_GPL(pmac_i2c_close);
1109
1110int pmac_i2c_setmode(struct pmac_i2c_bus *bus, int mode)
1111{
1112 WARN_ON(!bus->opened);
1113
1114
1115
1116
1117 if (mode < pmac_i2c_mode_dumb || mode > pmac_i2c_mode_combined) {
1118 printk(KERN_ERR "low_i2c: Invalid mode %d requested on"
1119 " bus %s !\n", mode, bus->busnode->full_name);
1120 return -EINVAL;
1121 }
1122 bus->mode = mode;
1123
1124 return 0;
1125}
1126EXPORT_SYMBOL_GPL(pmac_i2c_setmode);
1127
1128int pmac_i2c_xfer(struct pmac_i2c_bus *bus, u8 addrdir, int subsize,
1129 u32 subaddr, u8 *data, int len)
1130{
1131 int rc;
1132
1133 WARN_ON(!bus->opened);
1134
1135 DBG("xfer() chan=%d, addrdir=0x%x, mode=%d, subsize=%d, subaddr=0x%x,"
1136 " %d bytes, bus %s\n", bus->channel, addrdir, bus->mode, subsize,
1137 subaddr, len, bus->busnode->full_name);
1138
1139 rc = bus->xfer(bus, addrdir, subsize, subaddr, data, len);
1140
1141#ifdef DEBUG
1142 if (rc)
1143 DBG("xfer error %d\n", rc);
1144#endif
1145 return rc;
1146}
1147EXPORT_SYMBOL_GPL(pmac_i2c_xfer);
1148
1149
1150enum {
1151 pmac_i2c_quirk_invmask = 0x00000001u,
1152 pmac_i2c_quirk_skip = 0x00000002u,
1153};
1154
1155static void pmac_i2c_devscan(void (*callback)(struct device_node *dev,
1156 int quirks))
1157{
1158 struct pmac_i2c_bus *bus;
1159 struct device_node *np;
1160 static struct whitelist_ent {
1161 char *name;
1162 char *compatible;
1163 int quirks;
1164 } whitelist[] = {
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175 { "i2c-hwclock", "imic5002", pmac_i2c_quirk_skip },
1176 { "i2c-hwclock", "imic5003", pmac_i2c_quirk_skip },
1177 { "i2c-hwclock", NULL, pmac_i2c_quirk_invmask },
1178 { "i2c-cpu-voltage", NULL, 0},
1179 { "temp-monitor", NULL, 0 },
1180 { "supply-monitor", NULL, 0 },
1181 { NULL, NULL, 0 },
1182 };
1183
1184
1185
1186
1187
1188
1189 list_for_each_entry(bus, &pmac_i2c_busses, link) {
1190 for (np = NULL;
1191 (np = of_get_next_child(bus->busnode, np)) != NULL;) {
1192 struct whitelist_ent *p;
1193
1194 if (bus->flags & pmac_i2c_multibus)
1195 if (bus != pmac_i2c_find_bus(np))
1196 continue;
1197 for (p = whitelist; p->name != NULL; p++) {
1198 if (strcmp(np->name, p->name))
1199 continue;
1200 if (p->compatible &&
1201 !of_device_is_compatible(np, p->compatible))
1202 continue;
1203 if (p->quirks & pmac_i2c_quirk_skip)
1204 break;
1205 callback(np, p->quirks);
1206 break;
1207 }
1208 }
1209 }
1210}
1211
1212#define MAX_I2C_DATA 64
1213
1214struct pmac_i2c_pf_inst
1215{
1216 struct pmac_i2c_bus *bus;
1217 u8 addr;
1218 u8 buffer[MAX_I2C_DATA];
1219 u8 scratch[MAX_I2C_DATA];
1220 int bytes;
1221 int quirks;
1222};
1223
1224static void* pmac_i2c_do_begin(struct pmf_function *func, struct pmf_args *args)
1225{
1226 struct pmac_i2c_pf_inst *inst;
1227 struct pmac_i2c_bus *bus;
1228
1229 bus = pmac_i2c_find_bus(func->node);
1230 if (bus == NULL) {
1231 printk(KERN_ERR "low_i2c: Can't find bus for %s (pfunc)\n",
1232 func->node->full_name);
1233 return NULL;
1234 }
1235 if (pmac_i2c_open(bus, 0)) {
1236 printk(KERN_ERR "low_i2c: Can't open i2c bus for %s (pfunc)\n",
1237 func->node->full_name);
1238 return NULL;
1239 }
1240
1241
1242
1243
1244
1245
1246 inst = kzalloc(sizeof(struct pmac_i2c_pf_inst), GFP_KERNEL);
1247 if (inst == NULL) {
1248 pmac_i2c_close(bus);
1249 return NULL;
1250 }
1251 inst->bus = bus;
1252 inst->addr = pmac_i2c_get_dev_addr(func->node);
1253 inst->quirks = (int)(long)func->driver_data;
1254 return inst;
1255}
1256
1257static void pmac_i2c_do_end(struct pmf_function *func, void *instdata)
1258{
1259 struct pmac_i2c_pf_inst *inst = instdata;
1260
1261 if (inst == NULL)
1262 return;
1263 pmac_i2c_close(inst->bus);
1264 kfree(inst);
1265}
1266
1267static int pmac_i2c_do_read(PMF_STD_ARGS, u32 len)
1268{
1269 struct pmac_i2c_pf_inst *inst = instdata;
1270
1271 inst->bytes = len;
1272 return pmac_i2c_xfer(inst->bus, inst->addr | pmac_i2c_read, 0, 0,
1273 inst->buffer, len);
1274}
1275
1276static int pmac_i2c_do_write(PMF_STD_ARGS, u32 len, const u8 *data)
1277{
1278 struct pmac_i2c_pf_inst *inst = instdata;
1279
1280 return pmac_i2c_xfer(inst->bus, inst->addr | pmac_i2c_write, 0, 0,
1281 (u8 *)data, len);
1282}
1283
1284
1285
1286
1287
1288
1289
1290static void pmac_i2c_do_apply_rmw(struct pmac_i2c_pf_inst *inst,
1291 u32 len, const u8 *mask, const u8 *val)
1292{
1293 int i;
1294
1295 if (inst->quirks & pmac_i2c_quirk_invmask) {
1296 for (i = 0; i < len; i ++)
1297 inst->scratch[i] = (inst->buffer[i] & mask[i]) | val[i];
1298 } else {
1299 for (i = 0; i < len; i ++)
1300 inst->scratch[i] = (inst->buffer[i] & ~mask[i])
1301 | (val[i] & mask[i]);
1302 }
1303}
1304
1305static int pmac_i2c_do_rmw(PMF_STD_ARGS, u32 masklen, u32 valuelen,
1306 u32 totallen, const u8 *maskdata,
1307 const u8 *valuedata)
1308{
1309 struct pmac_i2c_pf_inst *inst = instdata;
1310
1311 if (masklen > inst->bytes || valuelen > inst->bytes ||
1312 totallen > inst->bytes || valuelen > masklen)
1313 return -EINVAL;
1314
1315 pmac_i2c_do_apply_rmw(inst, masklen, maskdata, valuedata);
1316
1317 return pmac_i2c_xfer(inst->bus, inst->addr | pmac_i2c_write, 0, 0,
1318 inst->scratch, totallen);
1319}
1320
1321static int pmac_i2c_do_read_sub(PMF_STD_ARGS, u8 subaddr, u32 len)
1322{
1323 struct pmac_i2c_pf_inst *inst = instdata;
1324
1325 inst->bytes = len;
1326 return pmac_i2c_xfer(inst->bus, inst->addr | pmac_i2c_read, 1, subaddr,
1327 inst->buffer, len);
1328}
1329
1330static int pmac_i2c_do_write_sub(PMF_STD_ARGS, u8 subaddr, u32 len,
1331 const u8 *data)
1332{
1333 struct pmac_i2c_pf_inst *inst = instdata;
1334
1335 return pmac_i2c_xfer(inst->bus, inst->addr | pmac_i2c_write, 1,
1336 subaddr, (u8 *)data, len);
1337}
1338
1339static int pmac_i2c_do_set_mode(PMF_STD_ARGS, int mode)
1340{
1341 struct pmac_i2c_pf_inst *inst = instdata;
1342
1343 return pmac_i2c_setmode(inst->bus, mode);
1344}
1345
1346static int pmac_i2c_do_rmw_sub(PMF_STD_ARGS, u8 subaddr, u32 masklen,
1347 u32 valuelen, u32 totallen, const u8 *maskdata,
1348 const u8 *valuedata)
1349{
1350 struct pmac_i2c_pf_inst *inst = instdata;
1351
1352 if (masklen > inst->bytes || valuelen > inst->bytes ||
1353 totallen > inst->bytes || valuelen > masklen)
1354 return -EINVAL;
1355
1356 pmac_i2c_do_apply_rmw(inst, masklen, maskdata, valuedata);
1357
1358 return pmac_i2c_xfer(inst->bus, inst->addr | pmac_i2c_write, 1,
1359 subaddr, inst->scratch, totallen);
1360}
1361
1362static int pmac_i2c_do_mask_and_comp(PMF_STD_ARGS, u32 len,
1363 const u8 *maskdata,
1364 const u8 *valuedata)
1365{
1366 struct pmac_i2c_pf_inst *inst = instdata;
1367 int i, match;
1368
1369
1370 if (!args || !args->count || !args->u[0].p)
1371 return -EINVAL;
1372
1373
1374 if (len > inst->bytes)
1375 return -EINVAL;
1376
1377 for (i = 0, match = 1; match && i < len; i ++)
1378 if ((inst->buffer[i] & maskdata[i]) != valuedata[i])
1379 match = 0;
1380 *args->u[0].p = match;
1381 return 0;
1382}
1383
1384static int pmac_i2c_do_delay(PMF_STD_ARGS, u32 duration)
1385{
1386 msleep((duration + 999) / 1000);
1387 return 0;
1388}
1389
1390
1391static struct pmf_handlers pmac_i2c_pfunc_handlers = {
1392 .begin = pmac_i2c_do_begin,
1393 .end = pmac_i2c_do_end,
1394 .read_i2c = pmac_i2c_do_read,
1395 .write_i2c = pmac_i2c_do_write,
1396 .rmw_i2c = pmac_i2c_do_rmw,
1397 .read_i2c_sub = pmac_i2c_do_read_sub,
1398 .write_i2c_sub = pmac_i2c_do_write_sub,
1399 .rmw_i2c_sub = pmac_i2c_do_rmw_sub,
1400 .set_i2c_mode = pmac_i2c_do_set_mode,
1401 .mask_and_compare = pmac_i2c_do_mask_and_comp,
1402 .delay = pmac_i2c_do_delay,
1403};
1404
1405static void __init pmac_i2c_dev_create(struct device_node *np, int quirks)
1406{
1407 DBG("dev_create(%s)\n", np->full_name);
1408
1409 pmf_register_driver(np, &pmac_i2c_pfunc_handlers,
1410 (void *)(long)quirks);
1411}
1412
1413static void __init pmac_i2c_dev_init(struct device_node *np, int quirks)
1414{
1415 DBG("dev_create(%s)\n", np->full_name);
1416
1417 pmf_do_functions(np, NULL, 0, PMF_FLAGS_ON_INIT, NULL);
1418}
1419
1420static void pmac_i2c_dev_suspend(struct device_node *np, int quirks)
1421{
1422 DBG("dev_suspend(%s)\n", np->full_name);
1423 pmf_do_functions(np, NULL, 0, PMF_FLAGS_ON_SLEEP, NULL);
1424}
1425
1426static void pmac_i2c_dev_resume(struct device_node *np, int quirks)
1427{
1428 DBG("dev_resume(%s)\n", np->full_name);
1429 pmf_do_functions(np, NULL, 0, PMF_FLAGS_ON_WAKE, NULL);
1430}
1431
1432void pmac_pfunc_i2c_suspend(void)
1433{
1434 pmac_i2c_devscan(pmac_i2c_dev_suspend);
1435}
1436
1437void pmac_pfunc_i2c_resume(void)
1438{
1439 pmac_i2c_devscan(pmac_i2c_dev_resume);
1440}
1441
1442
1443
1444
1445
1446
1447int __init pmac_i2c_init(void)
1448{
1449 static int i2c_inited;
1450
1451 if (i2c_inited)
1452 return 0;
1453 i2c_inited = 1;
1454
1455
1456 kw_i2c_probe();
1457
1458#ifdef CONFIG_ADB_PMU
1459
1460 pmu_i2c_probe();
1461#endif
1462
1463#ifdef CONFIG_PMAC_SMU
1464
1465 smu_i2c_probe();
1466#endif
1467
1468
1469 pmac_i2c_devscan(pmac_i2c_dev_create);
1470
1471 return 0;
1472}
1473machine_arch_initcall(powermac, pmac_i2c_init);
1474
1475
1476
1477
1478
1479static int __init pmac_i2c_create_platform_devices(void)
1480{
1481 struct pmac_i2c_bus *bus;
1482 int i = 0;
1483
1484
1485
1486
1487
1488 pmac_i2c_force_poll = 0;
1489
1490
1491 list_for_each_entry(bus, &pmac_i2c_busses, link) {
1492 bus->platform_dev =
1493 platform_device_alloc("i2c-powermac", i++);
1494 if (bus->platform_dev == NULL)
1495 return -ENOMEM;
1496 bus->platform_dev->dev.platform_data = bus;
1497 platform_device_add(bus->platform_dev);
1498 }
1499
1500
1501 pmac_i2c_devscan(pmac_i2c_dev_init);
1502
1503 return 0;
1504}
1505machine_subsys_initcall(powermac, pmac_i2c_create_platform_devices);
1506