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