?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
memcontrol: move mm_cgroup to header file
[linux-2.6/openmoko-kernel/knife-kernel.git] / drivers / ssb / main.c
blob9028ed5715a1e11b778454583c48e97d4c7e8bdd
1 /*
2 * Sonics Silicon Backplane
3 * Subsystem core
4 *
5 * Copyright 2005, Broadcom Corporation
6 * Copyright 2006, 2007, Michael Buesch <mb@bu3sch.de>
7 *
8 * Licensed under the GNU/GPL. See COPYING for details.
9 */
10
11 #include "ssb_private.h"
12
13 #include <linux/delay.h>
14 #include <linux/io.h>
15 #include <linux/ssb/ssb.h>
16 #include <linux/ssb/ssb_regs.h>
17 #include <linux/dma-mapping.h>
18 #include <linux/pci.h>
19
20 #include <pcmcia/cs_types.h>
21 #include <pcmcia/cs.h>
22 #include <pcmcia/cistpl.h>
23 #include <pcmcia/ds.h>
24
25
26 MODULE_DESCRIPTION("Sonics Silicon Backplane driver");
27 MODULE_LICENSE("GPL");
28
29
30 /* Temporary list of yet-to-be-attached buses */
31 static LIST_HEAD(attach_queue);
32 /* List if running buses */
33 static LIST_HEAD(buses);
34 /* Software ID counter */
35 static unsigned int next_busnumber;
36 /* buses_mutes locks the two buslists and the next_busnumber.
37 * Don't lock this directly, but use ssb_buses_[un]lock() below. */
38 static DEFINE_MUTEX(buses_mutex);
39
40 /* There are differences in the codeflow, if the bus is
41 * initialized from early boot, as various needed services
42 * are not available early. This is a mechanism to delay
43 * these initializations to after early boot has finished.
44 * It's also used to avoid mutex locking, as that's not
45 * available and needed early. */
46 static bool ssb_is_early_boot = 1;
47
48 static void ssb_buses_lock(void);
49 static void ssb_buses_unlock(void);
50
51
52 #ifdef CONFIG_SSB_PCIHOST
53 struct ssb_bus *ssb_pci_dev_to_bus(struct pci_dev *pdev)
54 {
55 struct ssb_bus *bus;
56
57 ssb_buses_lock();
58 list_for_each_entry(bus, &buses, list) {
59 if (bus->bustype == SSB_BUSTYPE_PCI &&
60 bus->host_pci == pdev)
61 goto found;
62 }
63 bus = NULL;
64 found:
65 ssb_buses_unlock();
66
67 return bus;
68 }
69 #endif /* CONFIG_SSB_PCIHOST */
70
71 static struct ssb_device *ssb_device_get(struct ssb_device *dev)
72 {
73 if (dev)
74 get_device(dev->dev);
75 return dev;
76 }
77
78 static void ssb_device_put(struct ssb_device *dev)
79 {
80 if (dev)
81 put_device(dev->dev);
82 }
83
84 static int ssb_bus_resume(struct ssb_bus *bus)
85 {
86 int err;
87
88 ssb_pci_xtal(bus, SSB_GPIO_XTAL | SSB_GPIO_PLL, 1);
89 err = ssb_pcmcia_init(bus);
90 if (err) {
91 /* No need to disable XTAL, as we don't have one on PCMCIA. */
92 return err;
93 }
94 ssb_chipco_resume(&bus->chipco);
95
96 return 0;
97 }
98
99 static int ssb_device_resume(struct device *dev)
100 {
101 struct ssb_device *ssb_dev = dev_to_ssb_dev(dev);
102 struct ssb_driver *ssb_drv;
103 struct ssb_bus *bus;
104 int err = 0;
105
106 bus = ssb_dev->bus;
107 if (bus->suspend_cnt == bus->nr_devices) {
108 err = ssb_bus_resume(bus);
109 if (err)
110 return err;
111 }
112 bus->suspend_cnt--;
113 if (dev->driver) {
114 ssb_drv = drv_to_ssb_drv(dev->driver);
115 if (ssb_drv && ssb_drv->resume)
116 err = ssb_drv->resume(ssb_dev);
117 if (err)
118 goto out;
119 }
120 out:
121 return err;
122 }
123
124 static void ssb_bus_suspend(struct ssb_bus *bus, pm_message_t state)
125 {
126 ssb_chipco_suspend(&bus->chipco, state);
127 ssb_pci_xtal(bus, SSB_GPIO_XTAL | SSB_GPIO_PLL, 0);
128
129 /* Reset HW state information in memory, so that HW is
130 * completely reinitialized on resume. */
131 bus->mapped_device = NULL;
132 #ifdef CONFIG_SSB_DRIVER_PCICORE
133 bus->pcicore.setup_done = 0;
134 #endif
135 #ifdef CONFIG_SSB_DEBUG
136 bus->powered_up = 0;
137 #endif
138 }
139
140 static int ssb_device_suspend(struct device *dev, pm_message_t state)
141 {
142 struct ssb_device *ssb_dev = dev_to_ssb_dev(dev);
143 struct ssb_driver *ssb_drv;
144 struct ssb_bus *bus;
145 int err = 0;
146
147 if (dev->driver) {
148 ssb_drv = drv_to_ssb_drv(dev->driver);
149 if (ssb_drv && ssb_drv->suspend)
150 err = ssb_drv->suspend(ssb_dev, state);
151 if (err)
152 goto out;
153 }
154
155 bus = ssb_dev->bus;
156 bus->suspend_cnt++;
157 if (bus->suspend_cnt == bus->nr_devices) {
158 /* All devices suspended. Shutdown the bus. */
159 ssb_bus_suspend(bus, state);
160 }
161
162 out:
163 return err;
164 }
165
166 #ifdef CONFIG_SSB_PCIHOST
167 int ssb_devices_freeze(struct ssb_bus *bus)
168 {
169 struct ssb_device *dev;
170 struct ssb_driver *drv;
171 int err = 0;
172 int i;
173 pm_message_t state = PMSG_FREEZE;
174
175 /* First check that we are capable to freeze all devices. */
176 for (i = 0; i < bus->nr_devices; i++) {
177 dev = &(bus->devices[i]);
178 if (!dev->dev ||
179 !dev->dev->driver ||
180 !device_is_registered(dev->dev))
181 continue;
182 drv = drv_to_ssb_drv(dev->dev->driver);
183 if (!drv)
184 continue;
185 if (!drv->suspend) {
186 /* Nope, can't suspend this one. */
187 return -EOPNOTSUPP;
188 }
189 }
190 /* Now suspend all devices */
191 for (i = 0; i < bus->nr_devices; i++) {
192 dev = &(bus->devices[i]);
193 if (!dev->dev ||
194 !dev->dev->driver ||
195 !device_is_registered(dev->dev))
196 continue;
197 drv = drv_to_ssb_drv(dev->dev->driver);
198 if (!drv)
199 continue;
200 err = drv->suspend(dev, state);
201 if (err) {
202 ssb_printk(KERN_ERR PFX "Failed to freeze device %s\n",
203 dev->dev->bus_id);
204 goto err_unwind;
205 }
206 }
207
208 return 0;
209 err_unwind:
210 for (i--; i >= 0; i--) {
211 dev = &(bus->devices[i]);
212 if (!dev->dev ||
213 !dev->dev->driver ||
214 !device_is_registered(dev->dev))
215 continue;
216 drv = drv_to_ssb_drv(dev->dev->driver);
217 if (!drv)
218 continue;
219 if (drv->resume)
220 drv->resume(dev);
221 }
222 return err;
223 }
224
225 int ssb_devices_thaw(struct ssb_bus *bus)
226 {
227 struct ssb_device *dev;
228 struct ssb_driver *drv;
229 int err;
230 int i;
231
232 for (i = 0; i < bus->nr_devices; i++) {
233 dev = &(bus->devices[i]);
234 if (!dev->dev ||
235 !dev->dev->driver ||
236 !device_is_registered(dev->dev))
237 continue;
238 drv = drv_to_ssb_drv(dev->dev->driver);
239 if (!drv)
240 continue;
241 if (SSB_WARN_ON(!drv->resume))
242 continue;
243 err = drv->resume(dev);
244 if (err) {
245 ssb_printk(KERN_ERR PFX "Failed to thaw device %s\n",
246 dev->dev->bus_id);
247 }
248 }
249
250 return 0;
251 }
252 #endif /* CONFIG_SSB_PCIHOST */
253
254 static void ssb_device_shutdown(struct device *dev)
255 {
256 struct ssb_device *ssb_dev = dev_to_ssb_dev(dev);
257 struct ssb_driver *ssb_drv;
258
259 if (!dev->driver)
260 return;
261 ssb_drv = drv_to_ssb_drv(dev->driver);
262 if (ssb_drv && ssb_drv->shutdown)
263 ssb_drv->shutdown(ssb_dev);
264 }
265
266 static int ssb_device_remove(struct device *dev)
267 {
268 struct ssb_device *ssb_dev = dev_to_ssb_dev(dev);
269 struct ssb_driver *ssb_drv = drv_to_ssb_drv(dev->driver);
270
271 if (ssb_drv && ssb_drv->remove)
272 ssb_drv->remove(ssb_dev);
273 ssb_device_put(ssb_dev);
274
275 return 0;
276 }
277
278 static int ssb_device_probe(struct device *dev)
279 {
280 struct ssb_device *ssb_dev = dev_to_ssb_dev(dev);
281 struct ssb_driver *ssb_drv = drv_to_ssb_drv(dev->driver);
282 int err = 0;
283
284 ssb_device_get(ssb_dev);
285 if (ssb_drv && ssb_drv->probe)
286 err = ssb_drv->probe(ssb_dev, &ssb_dev->id);
287 if (err)
288 ssb_device_put(ssb_dev);
289
290 return err;
291 }
292
293 static int ssb_match_devid(const struct ssb_device_id *tabid,
294 const struct ssb_device_id *devid)
295 {
296 if ((tabid->vendor != devid->vendor) &&
297 tabid->vendor != SSB_ANY_VENDOR)
298 return 0;
299 if ((tabid->coreid != devid->coreid) &&
300 tabid->coreid != SSB_ANY_ID)
301 return 0;
302 if ((tabid->revision != devid->revision) &&
303 tabid->revision != SSB_ANY_REV)
304 return 0;
305 return 1;
306 }
307
308 static int ssb_bus_match(struct device *dev, struct device_driver *drv)
309 {
310 struct ssb_device *ssb_dev = dev_to_ssb_dev(dev);
311 struct ssb_driver *ssb_drv = drv_to_ssb_drv(drv);
312 const struct ssb_device_id *id;
313
314 for (id = ssb_drv->id_table;
315 id->vendor || id->coreid || id->revision;
316 id++) {
317 if (ssb_match_devid(id, &ssb_dev->id))
318 return 1; /* found */
319 }
320
321 return 0;
322 }
323
324 static int ssb_device_uevent(struct device *dev, struct kobj_uevent_env *env)
325 {
326 struct ssb_device *ssb_dev = dev_to_ssb_dev(dev);
327
328 if (!dev)
329 return -ENODEV;
330
331 return add_uevent_var(env,
332 "MODALIAS=ssb:v%04Xid%04Xrev%02X",
333 ssb_dev->id.vendor, ssb_dev->id.coreid,
334 ssb_dev->id.revision);
335 }
336
337 static struct bus_type ssb_bustype = {
338 .name = "ssb",
339 .match = ssb_bus_match,
340 .probe = ssb_device_probe,
341 .remove = ssb_device_remove,
342 .shutdown = ssb_device_shutdown,
343 .suspend = ssb_device_suspend,
344 .resume = ssb_device_resume,
345 .uevent = ssb_device_uevent,
346 };
347
348 static void ssb_buses_lock(void)
349 {
350 /* See the comment at the ssb_is_early_boot definition */
351 if (!ssb_is_early_boot)
352 mutex_lock(&buses_mutex);
353 }
354
355 static void ssb_buses_unlock(void)
356 {
357 /* See the comment at the ssb_is_early_boot definition */
358 if (!ssb_is_early_boot)
359 mutex_unlock(&buses_mutex);
360 }
361
362 static void ssb_devices_unregister(struct ssb_bus *bus)
363 {
364 struct ssb_device *sdev;
365 int i;
366
367 for (i = bus->nr_devices - 1; i >= 0; i--) {
368 sdev = &(bus->devices[i]);
369 if (sdev->dev)
370 device_unregister(sdev->dev);
371 }
372 }
373
374 void ssb_bus_unregister(struct ssb_bus *bus)
375 {
376 ssb_buses_lock();
377 ssb_devices_unregister(bus);
378 list_del(&bus->list);
379 ssb_buses_unlock();
380
381 /* ssb_pcmcia_exit(bus); */
382 ssb_pci_exit(bus);
383 ssb_iounmap(bus);
384 }
385 EXPORT_SYMBOL(ssb_bus_unregister);
386
387 static void ssb_release_dev(struct device *dev)
388 {
389 struct __ssb_dev_wrapper *devwrap;
390
391 devwrap = container_of(dev, struct __ssb_dev_wrapper, dev);
392 kfree(devwrap);
393 }
394
395 static int ssb_devices_register(struct ssb_bus *bus)
396 {
397 struct ssb_device *sdev;
398 struct device *dev;
399 struct __ssb_dev_wrapper *devwrap;
400 int i, err = 0;
401 int dev_idx = 0;
402
403 for (i = 0; i < bus->nr_devices; i++) {
404 sdev = &(bus->devices[i]);
405
406 /* We don't register SSB-system devices to the kernel,
407 * as the drivers for them are built into SSB. */
408 switch (sdev->id.coreid) {
409 case SSB_DEV_CHIPCOMMON:
410 case SSB_DEV_PCI:
411 case SSB_DEV_PCIE:
412 case SSB_DEV_PCMCIA:
413 case SSB_DEV_MIPS:
414 case SSB_DEV_MIPS_3302:
415 case SSB_DEV_EXTIF:
416 continue;
417 }
418
419 devwrap = kzalloc(sizeof(*devwrap), GFP_KERNEL);
420 if (!devwrap) {
421 ssb_printk(KERN_ERR PFX
422 "Could not allocate device\n");
423 err = -ENOMEM;
424 goto error;
425 }
426 dev = &devwrap->dev;
427 devwrap->sdev = sdev;
428
429 dev->release = ssb_release_dev;
430 dev->bus = &ssb_bustype;
431 snprintf(dev->bus_id, sizeof(dev->bus_id),
432 "ssb%u:%d", bus->busnumber, dev_idx);
433
434 switch (bus->bustype) {
435 case SSB_BUSTYPE_PCI:
436 #ifdef CONFIG_SSB_PCIHOST
437 sdev->irq = bus->host_pci->irq;
438 dev->parent = &bus->host_pci->dev;
439 #endif
440 break;
441 case SSB_BUSTYPE_PCMCIA:
442 #ifdef CONFIG_SSB_PCMCIAHOST
443 sdev->irq = bus->host_pcmcia->irq.AssignedIRQ;
444 dev->parent = &bus->host_pcmcia->dev;
445 #endif
446 break;
447 case SSB_BUSTYPE_SSB:
448 break;
449 }
450
451 sdev->dev = dev;
452 err = device_register(dev);
453 if (err) {
454 ssb_printk(KERN_ERR PFX
455 "Could not register %s\n",
456 dev->bus_id);
457 /* Set dev to NULL to not unregister
458 * dev on error unwinding. */
459 sdev->dev = NULL;
460 kfree(devwrap);
461 goto error;
462 }
463 dev_idx++;
464 }
465
466 return 0;
467 error:
468 /* Unwind the already registered devices. */
469 ssb_devices_unregister(bus);
470 return err;
471 }
472
473 /* Needs ssb_buses_lock() */
474 static int ssb_attach_queued_buses(void)
475 {
476 struct ssb_bus *bus, *n;
477 int err = 0;
478 int drop_them_all = 0;
479
480 list_for_each_entry_safe(bus, n, &attach_queue, list) {
481 if (drop_them_all) {
482 list_del(&bus->list);
483 continue;
484 }
485 /* Can't init the PCIcore in ssb_bus_register(), as that
486 * is too early in boot for embedded systems
487 * (no udelay() available). So do it here in attach stage.
488 */
489 err = ssb_bus_powerup(bus, 0);
490 if (err)
491 goto error;
492 ssb_pcicore_init(&bus->pcicore);
493 ssb_bus_may_powerdown(bus);
494
495 err = ssb_devices_register(bus);
496 error:
497 if (err) {
498 drop_them_all = 1;
499 list_del(&bus->list);
500 continue;
501 }
502 list_move_tail(&bus->list, &buses);
503 }
504
505 return err;
506 }
507
508 static u16 ssb_ssb_read16(struct ssb_device *dev, u16 offset)
509 {
510 struct ssb_bus *bus = dev->bus;
511
512 offset += dev->core_index * SSB_CORE_SIZE;
513 return readw(bus->mmio + offset);
514 }
515
516 static u32 ssb_ssb_read32(struct ssb_device *dev, u16 offset)
517 {
518 struct ssb_bus *bus = dev->bus;
519
520 offset += dev->core_index * SSB_CORE_SIZE;
521 return readl(bus->mmio + offset);
522 }
523
524 static void ssb_ssb_write16(struct ssb_device *dev, u16 offset, u16 value)
525 {
526 struct ssb_bus *bus = dev->bus;
527
528 offset += dev->core_index * SSB_CORE_SIZE;
529 writew(value, bus->mmio + offset);
530 }
531
532 static void ssb_ssb_write32(struct ssb_device *dev, u16 offset, u32 value)
533 {
534 struct ssb_bus *bus = dev->bus;
535
536 offset += dev->core_index * SSB_CORE_SIZE;
537 writel(value, bus->mmio + offset);
538 }
539
540 /* Ops for the plain SSB bus without a host-device (no PCI or PCMCIA). */
541 static const struct ssb_bus_ops ssb_ssb_ops = {
542 .read16 = ssb_ssb_read16,
543 .read32 = ssb_ssb_read32,
544 .write16 = ssb_ssb_write16,
545 .write32 = ssb_ssb_write32,
546 };
547
548 static int ssb_fetch_invariants(struct ssb_bus *bus,
549 ssb_invariants_func_t get_invariants)
550 {
551 struct ssb_init_invariants iv;
552 int err;
553
554 memset(&iv, 0, sizeof(iv));
555 err = get_invariants(bus, &iv);
556 if (err)
557 goto out;
558 memcpy(&bus->boardinfo, &iv.boardinfo, sizeof(iv.boardinfo));
559 memcpy(&bus->sprom, &iv.sprom, sizeof(iv.sprom));
560 out:
561 return err;
562 }
563
564 static int ssb_bus_register(struct ssb_bus *bus,
565 ssb_invariants_func_t get_invariants,
566 unsigned long baseaddr)
567 {
568 int err;
569
570 spin_lock_init(&bus->bar_lock);
571 INIT_LIST_HEAD(&bus->list);
572
573 /* Powerup the bus */
574 err = ssb_pci_xtal(bus, SSB_GPIO_XTAL | SSB_GPIO_PLL, 1);
575 if (err)
576 goto out;
577 ssb_buses_lock();
578 bus->busnumber = next_busnumber;
579 /* Scan for devices (cores) */
580 err = ssb_bus_scan(bus, baseaddr);
581 if (err)
582 goto err_disable_xtal;
583
584 /* Init PCI-host device (if any) */
585 err = ssb_pci_init(bus);
586 if (err)
587 goto err_unmap;
588 /* Init PCMCIA-host device (if any) */
589 err = ssb_pcmcia_init(bus);
590 if (err)
591 goto err_pci_exit;
592
593 /* Initialize basic system devices (if available) */
594 err = ssb_bus_powerup(bus, 0);
595 if (err)
596 goto err_pcmcia_exit;
597 ssb_chipcommon_init(&bus->chipco);
598 ssb_mipscore_init(&bus->mipscore);
599 err = ssb_fetch_invariants(bus, get_invariants);
600 if (err) {
601 ssb_bus_may_powerdown(bus);
602 goto err_pcmcia_exit;
603 }
604 ssb_bus_may_powerdown(bus);
605
606 /* Queue it for attach.
607 * See the comment at the ssb_is_early_boot definition. */
608 list_add_tail(&bus->list, &attach_queue);
609 if (!ssb_is_early_boot) {
610 /* This is not early boot, so we must attach the bus now */
611 err = ssb_attach_queued_buses();
612 if (err)
613 goto err_dequeue;
614 }
615 next_busnumber++;
616 ssb_buses_unlock();
617
618 out:
619 return err;
620
621 err_dequeue:
622 list_del(&bus->list);
623 err_pcmcia_exit:
624 /* ssb_pcmcia_exit(bus); */
625 err_pci_exit:
626 ssb_pci_exit(bus);
627 err_unmap:
628 ssb_iounmap(bus);
629 err_disable_xtal:
630 ssb_buses_unlock();
631 ssb_pci_xtal(bus, SSB_GPIO_XTAL | SSB_GPIO_PLL, 0);
632 return err;
633 }
634
635 #ifdef CONFIG_SSB_PCIHOST
636 int ssb_bus_pcibus_register(struct ssb_bus *bus,
637 struct pci_dev *host_pci)
638 {
639 int err;
640
641 bus->bustype = SSB_BUSTYPE_PCI;
642 bus->host_pci = host_pci;
643 bus->ops = &ssb_pci_ops;
644
645 err = ssb_bus_register(bus, ssb_pci_get_invariants, 0);
646 if (!err) {
647 ssb_printk(KERN_INFO PFX "Sonics Silicon Backplane found on "
648 "PCI device %s\n", host_pci->dev.bus_id);
649 }
650
651 return err;
652 }
653 EXPORT_SYMBOL(ssb_bus_pcibus_register);
654 #endif /* CONFIG_SSB_PCIHOST */
655
656 #ifdef CONFIG_SSB_PCMCIAHOST
657 int ssb_bus_pcmciabus_register(struct ssb_bus *bus,
658 struct pcmcia_device *pcmcia_dev,
659 unsigned long baseaddr)
660 {
661 int err;
662
663 bus->bustype = SSB_BUSTYPE_PCMCIA;
664 bus->host_pcmcia = pcmcia_dev;
665 bus->ops = &ssb_pcmcia_ops;
666
667 err = ssb_bus_register(bus, ssb_pcmcia_get_invariants, baseaddr);
668 if (!err) {
669 ssb_printk(KERN_INFO PFX "Sonics Silicon Backplane found on "
670 "PCMCIA device %s\n", pcmcia_dev->devname);
671 }
672
673 return err;
674 }
675 EXPORT_SYMBOL(ssb_bus_pcmciabus_register);
676 #endif /* CONFIG_SSB_PCMCIAHOST */
677
678 int ssb_bus_ssbbus_register(struct ssb_bus *bus,
679 unsigned long baseaddr,
680 ssb_invariants_func_t get_invariants)
681 {
682 int err;
683
684 bus->bustype = SSB_BUSTYPE_SSB;
685 bus->ops = &ssb_ssb_ops;
686
687 err = ssb_bus_register(bus, get_invariants, baseaddr);
688 if (!err) {
689 ssb_printk(KERN_INFO PFX "Sonics Silicon Backplane found at "
690 "address 0x%08lX\n", baseaddr);
691 }
692
693 return err;
694 }
695
696 int __ssb_driver_register(struct ssb_driver *drv, struct module *owner)
697 {
698 drv->drv.name = drv->name;
699 drv->drv.bus = &ssb_bustype;
700 drv->drv.owner = owner;
701
702 return driver_register(&drv->drv);
703 }
704 EXPORT_SYMBOL(__ssb_driver_register);
705
706 void ssb_driver_unregister(struct ssb_driver *drv)
707 {
708 driver_unregister(&drv->drv);
709 }
710 EXPORT_SYMBOL(ssb_driver_unregister);
711
712 void ssb_set_devtypedata(struct ssb_device *dev, void *data)
713 {
714 struct ssb_bus *bus = dev->bus;
715 struct ssb_device *ent;
716 int i;
717
718 for (i = 0; i < bus->nr_devices; i++) {
719 ent = &(bus->devices[i]);
720 if (ent->id.vendor != dev->id.vendor)
721 continue;
722 if (ent->id.coreid != dev->id.coreid)
723 continue;
724
725 ent->devtypedata = data;
726 }
727 }
728 EXPORT_SYMBOL(ssb_set_devtypedata);
729
730 static u32 clkfactor_f6_resolve(u32 v)
731 {
732 /* map the magic values */
733 switch (v) {
734 case SSB_CHIPCO_CLK_F6_2:
735 return 2;
736 case SSB_CHIPCO_CLK_F6_3:
737 return 3;
738 case SSB_CHIPCO_CLK_F6_4:
739 return 4;
740 case SSB_CHIPCO_CLK_F6_5:
741 return 5;
742 case SSB_CHIPCO_CLK_F6_6:
743 return 6;
744 case SSB_CHIPCO_CLK_F6_7:
745 return 7;
746 }
747 return 0;
748 }
749
750 /* Calculate the speed the backplane would run at a given set of clockcontrol values */
751 u32 ssb_calc_clock_rate(u32 plltype, u32 n, u32 m)
752 {
753 u32 n1, n2, clock, m1, m2, m3, mc;
754
755 n1 = (n & SSB_CHIPCO_CLK_N1);
756 n2 = ((n & SSB_CHIPCO_CLK_N2) >> SSB_CHIPCO_CLK_N2_SHIFT);
757
758 switch (plltype) {
759 case SSB_PLLTYPE_6: /* 100/200 or 120/240 only */
760 if (m & SSB_CHIPCO_CLK_T6_MMASK)
761 return SSB_CHIPCO_CLK_T6_M0;
762 return SSB_CHIPCO_CLK_T6_M1;
763 case SSB_PLLTYPE_1: /* 48Mhz base, 3 dividers */
764 case SSB_PLLTYPE_3: /* 25Mhz, 2 dividers */
765 case SSB_PLLTYPE_4: /* 48Mhz, 4 dividers */
766 case SSB_PLLTYPE_7: /* 25Mhz, 4 dividers */
767 n1 = clkfactor_f6_resolve(n1);
768 n2 += SSB_CHIPCO_CLK_F5_BIAS;
769 break;
770 case SSB_PLLTYPE_2: /* 48Mhz, 4 dividers */
771 n1 += SSB_CHIPCO_CLK_T2_BIAS;
772 n2 += SSB_CHIPCO_CLK_T2_BIAS;
773 SSB_WARN_ON(!((n1 >= 2) && (n1 <= 7)));
774 SSB_WARN_ON(!((n2 >= 5) && (n2 <= 23)));
775 break;
776 case SSB_PLLTYPE_5: /* 25Mhz, 4 dividers */
777 return 100000000;
778 default:
779 SSB_WARN_ON(1);
780 }
781
782 switch (plltype) {
783 case SSB_PLLTYPE_3: /* 25Mhz, 2 dividers */
784 case SSB_PLLTYPE_7: /* 25Mhz, 4 dividers */
785 clock = SSB_CHIPCO_CLK_BASE2 * n1 * n2;
786 break;
787 default:
788 clock = SSB_CHIPCO_CLK_BASE1 * n1 * n2;
789 }
790 if (!clock)
791 return 0;
792
793 m1 = (m & SSB_CHIPCO_CLK_M1);
794 m2 = ((m & SSB_CHIPCO_CLK_M2) >> SSB_CHIPCO_CLK_M2_SHIFT);
795 m3 = ((m & SSB_CHIPCO_CLK_M3) >> SSB_CHIPCO_CLK_M3_SHIFT);
796 mc = ((m & SSB_CHIPCO_CLK_MC) >> SSB_CHIPCO_CLK_MC_SHIFT);
797
798 switch (plltype) {
799 case SSB_PLLTYPE_1: /* 48Mhz base, 3 dividers */
800 case SSB_PLLTYPE_3: /* 25Mhz, 2 dividers */
801 case SSB_PLLTYPE_4: /* 48Mhz, 4 dividers */
802 case SSB_PLLTYPE_7: /* 25Mhz, 4 dividers */
803 m1 = clkfactor_f6_resolve(m1);
804 if ((plltype == SSB_PLLTYPE_1) ||
805 (plltype == SSB_PLLTYPE_3))
806 m2 += SSB_CHIPCO_CLK_F5_BIAS;
807 else
808 m2 = clkfactor_f6_resolve(m2);
809 m3 = clkfactor_f6_resolve(m3);
810
811 switch (mc) {
812 case SSB_CHIPCO_CLK_MC_BYPASS:
813 return clock;
814 case SSB_CHIPCO_CLK_MC_M1:
815 return (clock / m1);
816 case SSB_CHIPCO_CLK_MC_M1M2:
817 return (clock / (m1 * m2));
818 case SSB_CHIPCO_CLK_MC_M1M2M3:
819 return (clock / (m1 * m2 * m3));
820 case SSB_CHIPCO_CLK_MC_M1M3:
821 return (clock / (m1 * m3));
822 }
823 return 0;
824 case SSB_PLLTYPE_2:
825 m1 += SSB_CHIPCO_CLK_T2_BIAS;
826 m2 += SSB_CHIPCO_CLK_T2M2_BIAS;
827 m3 += SSB_CHIPCO_CLK_T2_BIAS;
828 SSB_WARN_ON(!((m1 >= 2) && (m1 <= 7)));
829 SSB_WARN_ON(!((m2 >= 3) && (m2 <= 10)));
830 SSB_WARN_ON(!((m3 >= 2) && (m3 <= 7)));
831
832 if (!(mc & SSB_CHIPCO_CLK_T2MC_M1BYP))
833 clock /= m1;
834 if (!(mc & SSB_CHIPCO_CLK_T2MC_M2BYP))
835 clock /= m2;
836 if (!(mc & SSB_CHIPCO_CLK_T2MC_M3BYP))
837 clock /= m3;
838 return clock;
839 default:
840 SSB_WARN_ON(1);
841 }
842 return 0;
843 }
844
845 /* Get the current speed the backplane is running at */
846 u32 ssb_clockspeed(struct ssb_bus *bus)
847 {
848 u32 rate;
849 u32 plltype;
850 u32 clkctl_n, clkctl_m;
851
852 if (ssb_extif_available(&bus->extif))
853 ssb_extif_get_clockcontrol(&bus->extif, &plltype,
854 &clkctl_n, &clkctl_m);
855 else if (bus->chipco.dev)
856 ssb_chipco_get_clockcontrol(&bus->chipco, &plltype,
857 &clkctl_n, &clkctl_m);
858 else
859 return 0;
860
861 if (bus->chip_id == 0x5365) {
862 rate = 100000000;
863 } else {
864 rate = ssb_calc_clock_rate(plltype, clkctl_n, clkctl_m);
865 if (plltype == SSB_PLLTYPE_3) /* 25Mhz, 2 dividers */
866 rate /= 2;
867 }
868
869 return rate;
870 }
871 EXPORT_SYMBOL(ssb_clockspeed);
872
873 static u32 ssb_tmslow_reject_bitmask(struct ssb_device *dev)
874 {
875 u32 rev = ssb_read32(dev, SSB_IDLOW) & SSB_IDLOW_SSBREV;
876
877 /* The REJECT bit changed position in TMSLOW between
878 * Backplane revisions. */
879 switch (rev) {
880 case SSB_IDLOW_SSBREV_22:
881 return SSB_TMSLOW_REJECT_22;
882 case SSB_IDLOW_SSBREV_23:
883 return SSB_TMSLOW_REJECT_23;
884 case SSB_IDLOW_SSBREV_24: /* TODO - find the proper REJECT bits */
885 case SSB_IDLOW_SSBREV_25: /* same here */
886 case SSB_IDLOW_SSBREV_26: /* same here */
887 case SSB_IDLOW_SSBREV_27: /* same here */
888 return SSB_TMSLOW_REJECT_23; /* this is a guess */
889 default:
890 printk(KERN_INFO "ssb: Backplane Revision 0x%.8X\n", rev);
891 WARN_ON(1);
892 }
893 return (SSB_TMSLOW_REJECT_22 | SSB_TMSLOW_REJECT_23);
894 }
895
896 int ssb_device_is_enabled(struct ssb_device *dev)
897 {
898 u32 val;
899 u32 reject;
900
901 reject = ssb_tmslow_reject_bitmask(dev);
902 val = ssb_read32(dev, SSB_TMSLOW);
903 val &= SSB_TMSLOW_CLOCK | SSB_TMSLOW_RESET | reject;
904
905 return (val == SSB_TMSLOW_CLOCK);
906 }
907 EXPORT_SYMBOL(ssb_device_is_enabled);
908
909 static void ssb_flush_tmslow(struct ssb_device *dev)
910 {
911 /* Make _really_ sure the device has finished the TMSLOW
912 * register write transaction, as we risk running into
913 * a machine check exception otherwise.
914 * Do this by reading the register back to commit the
915 * PCI write and delay an additional usec for the device
916 * to react to the change. */
917 ssb_read32(dev, SSB_TMSLOW);
918 udelay(1);
919 }
920
921 void ssb_device_enable(struct ssb_device *dev, u32 core_specific_flags)
922 {
923 u32 val;
924
925 ssb_device_disable(dev, core_specific_flags);
926 ssb_write32(dev, SSB_TMSLOW,
927 SSB_TMSLOW_RESET | SSB_TMSLOW_CLOCK |
928 SSB_TMSLOW_FGC | core_specific_flags);
929 ssb_flush_tmslow(dev);
930
931 /* Clear SERR if set. This is a hw bug workaround. */
932 if (ssb_read32(dev, SSB_TMSHIGH) & SSB_TMSHIGH_SERR)
933 ssb_write32(dev, SSB_TMSHIGH, 0);
934
935 val = ssb_read32(dev, SSB_IMSTATE);
936 if (val & (SSB_IMSTATE_IBE | SSB_IMSTATE_TO)) {
937 val &= ~(SSB_IMSTATE_IBE | SSB_IMSTATE_TO);
938 ssb_write32(dev, SSB_IMSTATE, val);
939 }
940
941 ssb_write32(dev, SSB_TMSLOW,
942 SSB_TMSLOW_CLOCK | SSB_TMSLOW_FGC |
943 core_specific_flags);
944 ssb_flush_tmslow(dev);
945
946 ssb_write32(dev, SSB_TMSLOW, SSB_TMSLOW_CLOCK |
947 core_specific_flags);
948 ssb_flush_tmslow(dev);
949 }
950 EXPORT_SYMBOL(ssb_device_enable);
951
952 /* Wait for a bit in a register to get set or unset.
953 * timeout is in units of ten-microseconds */
954 static int ssb_wait_bit(struct ssb_device *dev, u16 reg, u32 bitmask,
955 int timeout, int set)
956 {
957 int i;
958 u32 val;
959
960 for (i = 0; i < timeout; i++) {
961 val = ssb_read32(dev, reg);
962 if (set) {
963 if (val & bitmask)
964 return 0;
965 } else {
966 if (!(val & bitmask))
967 return 0;
968 }
969 udelay(10);
970 }
971 printk(KERN_ERR PFX "Timeout waiting for bitmask %08X on "
972 "register %04X to %s.\n",
973 bitmask, reg, (set ? "set" : "clear"));
974
975 return -ETIMEDOUT;
976 }
977
978 void ssb_device_disable(struct ssb_device *dev, u32 core_specific_flags)
979 {
980 u32 reject;
981
982 if (ssb_read32(dev, SSB_TMSLOW) & SSB_TMSLOW_RESET)
983 return;
984
985 reject = ssb_tmslow_reject_bitmask(dev);
986 ssb_write32(dev, SSB_TMSLOW, reject | SSB_TMSLOW_CLOCK);
987 ssb_wait_bit(dev, SSB_TMSLOW, reject, 1000, 1);
988 ssb_wait_bit(dev, SSB_TMSHIGH, SSB_TMSHIGH_BUSY, 1000, 0);
989 ssb_write32(dev, SSB_TMSLOW,
990 SSB_TMSLOW_FGC | SSB_TMSLOW_CLOCK |
991 reject | SSB_TMSLOW_RESET |
992 core_specific_flags);
993 ssb_flush_tmslow(dev);
994
995 ssb_write32(dev, SSB_TMSLOW,
996 reject | SSB_TMSLOW_RESET |
997 core_specific_flags);
998 ssb_flush_tmslow(dev);
999 }
1000 EXPORT_SYMBOL(ssb_device_disable);
1001
1002 u32 ssb_dma_translation(struct ssb_device *dev)
1003 {
1004 switch (dev->bus->bustype) {
1005 case SSB_BUSTYPE_SSB:
1006 return 0;
1007 case SSB_BUSTYPE_PCI:
1008 case SSB_BUSTYPE_PCMCIA:
1009 return SSB_PCI_DMA;
1010 }
1011 return 0;
1012 }
1013 EXPORT_SYMBOL(ssb_dma_translation);
1014
1015 int ssb_dma_set_mask(struct ssb_device *ssb_dev, u64 mask)
1016 {
1017 struct device *dev = ssb_dev->dev;
1018
1019 #ifdef CONFIG_SSB_PCIHOST
1020 if (ssb_dev->bus->bustype == SSB_BUSTYPE_PCI &&
1021 !dma_supported(dev, mask))
1022 return -EIO;
1023 #endif
1024 dev->coherent_dma_mask = mask;
1025 dev->dma_mask = &dev->coherent_dma_mask;
1026
1027 return 0;
1028 }
1029 EXPORT_SYMBOL(ssb_dma_set_mask);
1030
1031 int ssb_bus_may_powerdown(struct ssb_bus *bus)
1032 {
1033 struct ssb_chipcommon *cc;
1034 int err = 0;
1035
1036 /* On buses where more than one core may be working
1037 * at a time, we must not powerdown stuff if there are
1038 * still cores that may want to run. */
1039 if (bus->bustype == SSB_BUSTYPE_SSB)
1040 goto out;
1041
1042 cc = &bus->chipco;
1043 ssb_chipco_set_clockmode(cc, SSB_CLKMODE_SLOW);
1044 err = ssb_pci_xtal(bus, SSB_GPIO_XTAL | SSB_GPIO_PLL, 0);
1045 if (err)
1046 goto error;
1047 out:
1048 #ifdef CONFIG_SSB_DEBUG
1049 bus->powered_up = 0;
1050 #endif
1051 return err;
1052 error:
1053 ssb_printk(KERN_ERR PFX "Bus powerdown failed\n");
1054 goto out;
1055 }
1056 EXPORT_SYMBOL(ssb_bus_may_powerdown);
1057
1058 int ssb_bus_powerup(struct ssb_bus *bus, bool dynamic_pctl)
1059 {
1060 struct ssb_chipcommon *cc;
1061 int err;
1062 enum ssb_clkmode mode;
1063
1064 err = ssb_pci_xtal(bus, SSB_GPIO_XTAL | SSB_GPIO_PLL, 1);
1065 if (err)
1066 goto error;
1067 cc = &bus->chipco;
1068 mode = dynamic_pctl ? SSB_CLKMODE_DYNAMIC : SSB_CLKMODE_FAST;
1069 ssb_chipco_set_clockmode(cc, mode);
1070
1071 #ifdef CONFIG_SSB_DEBUG
1072 bus->powered_up = 1;
1073 #endif
1074 return 0;
1075 error:
1076 ssb_printk(KERN_ERR PFX "Bus powerup failed\n");
1077 return err;
1078 }
1079 EXPORT_SYMBOL(ssb_bus_powerup);
1080
1081 u32 ssb_admatch_base(u32 adm)
1082 {
1083 u32 base = 0;
1084
1085 switch (adm & SSB_ADM_TYPE) {
1086 case SSB_ADM_TYPE0:
1087 base = (adm & SSB_ADM_BASE0);
1088 break;
1089 case SSB_ADM_TYPE1:
1090 SSB_WARN_ON(adm & SSB_ADM_NEG); /* unsupported */
1091 base = (adm & SSB_ADM_BASE1);
1092 break;
1093 case SSB_ADM_TYPE2:
1094 SSB_WARN_ON(adm & SSB_ADM_NEG); /* unsupported */
1095 base = (adm & SSB_ADM_BASE2);
1096 break;
1097 default:
1098 SSB_WARN_ON(1);
1099 }
1100
1101 return base;
1102 }
1103 EXPORT_SYMBOL(ssb_admatch_base);
1104
1105 u32 ssb_admatch_size(u32 adm)
1106 {
1107 u32 size = 0;
1108
1109 switch (adm & SSB_ADM_TYPE) {
1110 case SSB_ADM_TYPE0:
1111 size = ((adm & SSB_ADM_SZ0) >> SSB_ADM_SZ0_SHIFT);
1112 break;
1113 case SSB_ADM_TYPE1:
1114 SSB_WARN_ON(adm & SSB_ADM_NEG); /* unsupported */
1115 size = ((adm & SSB_ADM_SZ1) >> SSB_ADM_SZ1_SHIFT);
1116 break;
1117 case SSB_ADM_TYPE2:
1118 SSB_WARN_ON(adm & SSB_ADM_NEG); /* unsupported */
1119 size = ((adm & SSB_ADM_SZ2) >> SSB_ADM_SZ2_SHIFT);
1120 break;
1121 default:
1122 SSB_WARN_ON(1);
1123 }
1124 size = (1 << (size + 1));
1125
1126 return size;
1127 }
1128 EXPORT_SYMBOL(ssb_admatch_size);
1129
1130 static int __init ssb_modinit(void)
1131 {
1132 int err;
1133
1134 /* See the comment at the ssb_is_early_boot definition */
1135 ssb_is_early_boot = 0;
1136 err = bus_register(&ssb_bustype);
1137 if (err)
1138 return err;
1139
1140 /* Maybe we already registered some buses at early boot.
1141 * Check for this and attach them
1142 */
1143 ssb_buses_lock();
1144 err = ssb_attach_queued_buses();
1145 ssb_buses_unlock();
1146 if (err)
1147 bus_unregister(&ssb_bustype);
1148
1149 err = b43_pci_ssb_bridge_init();
1150 if (err) {
1151 ssb_printk(KERN_ERR "Broadcom 43xx PCI-SSB-bridge "
1152 "initialization failed");
1153 /* don't fail SSB init because of this */
1154 err = 0;
1155 }
1156
1157 return err;
1158 }
1159 /* ssb must be initialized after PCI but before the ssb drivers.
1160 * That means we must use some initcall between subsys_initcall
1161 * and device_initcall. */
1162 fs_initcall(ssb_modinit);
1163
1164 static void __exit ssb_modexit(void)
1165 {
1166 b43_pci_ssb_bridge_exit();
1167 bus_unregister(&ssb_bustype);
1168 }
1169 module_exit(ssb_modexit)
Community contributions to the Openmoko Kernel