2 * 64-bit pSeries and RS/6000 setup code.
4 * Copyright (C) 1995 Linus Torvalds
5 * Adapted from 'alpha' version by Gary Thomas
6 * Modified by Cort Dougan (cort@cs.nmt.edu)
7 * Modified by PPC64 Team, IBM Corp
9 * This program is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License
11 * as published by the Free Software Foundation; either version
12 * 2 of the License, or (at your option) any later version.
16 * bootup setup stuff..
19 #include <linux/cpu.h>
20 #include <linux/errno.h>
21 #include <linux/sched.h>
22 #include <linux/kernel.h>
24 #include <linux/stddef.h>
25 #include <linux/unistd.h>
26 #include <linux/user.h>
27 #include <linux/tty.h>
28 #include <linux/major.h>
29 #include <linux/interrupt.h>
30 #include <linux/reboot.h>
31 #include <linux/init.h>
32 #include <linux/ioport.h>
33 #include <linux/console.h>
34 #include <linux/pci.h>
35 #include <linux/utsname.h>
36 #include <linux/adb.h>
37 #include <linux/export.h>
38 #include <linux/delay.h>
39 #include <linux/irq.h>
40 #include <linux/seq_file.h>
41 #include <linux/root_dev.h>
43 #include <linux/of_pci.h>
46 #include <asm/processor.h>
48 #include <asm/pgtable.h>
51 #include <asm/pci-bridge.h>
52 #include <asm/iommu.h>
54 #include <asm/machdep.h>
57 #include <asm/nvram.h>
60 #include <asm/ppc-pci.h>
61 #include <asm/i8259.h>
64 #include <asm/firmware.h>
67 #include <asm/plpar_wrappers.h>
68 #include <asm/kexec.h>
69 #include <asm/isa-bridge.h>
75 unsigned long CMO_PageSize = (ASM_CONST(1) << IOMMU_PAGE_SHIFT_4K);
76 EXPORT_SYMBOL(CMO_PageSize);
78 int fwnmi_active; /* TRUE if an FWNMI handler is present */
80 static void pSeries_show_cpuinfo(struct seq_file *m)
82 struct device_node *root;
83 const char *model = "";
85 root = of_find_node_by_path("/");
87 model = of_get_property(root, "model", NULL);
88 seq_printf(m, "machine\t\t: CHRP %s\n", model);
92 /* Initialize firmware assisted non-maskable interrupts if
93 * the firmware supports this feature.
95 static void __init fwnmi_init(void)
97 unsigned long system_reset_addr, machine_check_addr;
99 int ibm_nmi_register = rtas_token("ibm,nmi-register");
100 if (ibm_nmi_register == RTAS_UNKNOWN_SERVICE)
103 /* If the kernel's not linked at zero we point the firmware at low
104 * addresses anyway, and use a trampoline to get to the real code. */
105 system_reset_addr = __pa(system_reset_fwnmi) - PHYSICAL_START;
106 machine_check_addr = __pa(machine_check_fwnmi) - PHYSICAL_START;
108 if (0 == rtas_call(ibm_nmi_register, 2, 1, NULL, system_reset_addr,
113 static void pseries_8259_cascade(struct irq_desc *desc)
115 struct irq_chip *chip = irq_desc_get_chip(desc);
116 unsigned int cascade_irq = i8259_irq();
119 generic_handle_irq(cascade_irq);
121 chip->irq_eoi(&desc->irq_data);
124 static void __init pseries_setup_i8259_cascade(void)
126 struct device_node *np, *old, *found = NULL;
127 unsigned int cascade;
129 unsigned long intack = 0;
132 for_each_node_by_type(np, "interrupt-controller") {
133 if (of_device_is_compatible(np, "chrp,iic")) {
140 printk(KERN_DEBUG "pic: no ISA interrupt controller\n");
144 cascade = irq_of_parse_and_map(found, 0);
146 printk(KERN_ERR "pic: failed to map cascade interrupt");
149 pr_debug("pic: cascade mapped to irq %d\n", cascade);
151 for (old = of_node_get(found); old != NULL ; old = np) {
152 np = of_get_parent(old);
156 if (strcmp(np->name, "pci") != 0)
158 addrp = of_get_property(np, "8259-interrupt-acknowledge", NULL);
161 naddr = of_n_addr_cells(np);
162 intack = addrp[naddr-1];
164 intack |= ((unsigned long)addrp[naddr-2]) << 32;
167 printk(KERN_DEBUG "pic: PCI 8259 intack at 0x%016lx\n", intack);
168 i8259_init(found, intack);
170 irq_set_chained_handler(cascade, pseries_8259_cascade);
173 static void __init pseries_init_irq(void)
176 pseries_setup_i8259_cascade();
179 static void pseries_lpar_enable_pmcs(void)
181 unsigned long set, reset;
185 plpar_hcall_norets(H_PERFMON, set, reset);
188 static int pci_dn_reconfig_notifier(struct notifier_block *nb, unsigned long action, void *data)
190 struct of_reconfig_data *rd = data;
191 struct device_node *parent, *np = rd->dn;
196 case OF_RECONFIG_ATTACH_NODE:
197 parent = of_get_parent(np);
198 pdn = parent ? PCI_DN(parent) : NULL;
200 pci_add_device_node_info(pdn->phb, np);
204 case OF_RECONFIG_DETACH_NODE:
207 list_del(&pdn->list);
216 static struct notifier_block pci_dn_reconfig_nb = {
217 .notifier_call = pci_dn_reconfig_notifier,
220 struct kmem_cache *dtl_cache;
222 #ifdef CONFIG_VIRT_CPU_ACCOUNTING_NATIVE
224 * Allocate space for the dispatch trace log for all possible cpus
225 * and register the buffers with the hypervisor. This is used for
226 * computing time stolen by the hypervisor.
228 static int alloc_dispatch_logs(void)
231 struct paca_struct *pp;
232 struct dtl_entry *dtl;
234 if (!firmware_has_feature(FW_FEATURE_SPLPAR))
240 for_each_possible_cpu(cpu) {
242 dtl = kmem_cache_alloc(dtl_cache, GFP_KERNEL);
244 pr_warn("Failed to allocate dispatch trace log for cpu %d\n",
246 pr_warn("Stolen time statistics will be unreliable\n");
251 pp->dispatch_log = dtl;
252 pp->dispatch_log_end = dtl + N_DISPATCH_LOG;
256 /* Register the DTL for the current (boot) cpu */
257 dtl = get_paca()->dispatch_log;
258 get_paca()->dtl_ridx = 0;
259 get_paca()->dtl_curr = dtl;
260 get_paca()->lppaca_ptr->dtl_idx = 0;
262 /* hypervisor reads buffer length from this field */
263 dtl->enqueue_to_dispatch_time = cpu_to_be32(DISPATCH_LOG_BYTES);
264 ret = register_dtl(hard_smp_processor_id(), __pa(dtl));
266 pr_err("WARNING: DTL registration of cpu %d (hw %d) failed "
267 "with %d\n", smp_processor_id(),
268 hard_smp_processor_id(), ret);
269 get_paca()->lppaca_ptr->dtl_enable_mask = 2;
273 #else /* !CONFIG_VIRT_CPU_ACCOUNTING_NATIVE */
274 static inline int alloc_dispatch_logs(void)
278 #endif /* CONFIG_VIRT_CPU_ACCOUNTING_NATIVE */
280 static int alloc_dispatch_log_kmem_cache(void)
282 dtl_cache = kmem_cache_create("dtl", DISPATCH_LOG_BYTES,
283 DISPATCH_LOG_BYTES, 0, NULL);
285 pr_warn("Failed to create dispatch trace log buffer cache\n");
286 pr_warn("Stolen time statistics will be unreliable\n");
290 return alloc_dispatch_logs();
292 machine_early_initcall(pseries, alloc_dispatch_log_kmem_cache);
294 static void pseries_lpar_idle(void)
297 * Default handler to go into low thread priority and possibly
298 * low power mode by ceding processor to hypervisor
301 /* Indicate to hypervisor that we are idle. */
302 get_lppaca()->idle = 1;
305 * Yield the processor to the hypervisor. We return if
306 * an external interrupt occurs (which are driven prior
307 * to returning here) or if a prod occurs from another
308 * processor. When returning here, external interrupts
313 get_lppaca()->idle = 0;
317 * Enable relocation on during exceptions. This has partition wide scope and
318 * may take a while to complete, if it takes longer than one second we will
319 * just give up rather than wasting any more time on this - if that turns out
320 * to ever be a problem in practice we can move this into a kernel thread to
321 * finish off the process later in boot.
323 void pseries_enable_reloc_on_exc(void)
326 unsigned int delay, total_delay = 0;
329 rc = enable_reloc_on_exceptions();
330 if (!H_IS_LONG_BUSY(rc)) {
332 pr_info("Relocation on exceptions not"
334 } else if (rc != H_SUCCESS) {
335 pr_warn("Unable to enable relocation"
336 " on exceptions: %ld\n", rc);
341 delay = get_longbusy_msecs(rc);
342 total_delay += delay;
343 if (total_delay > 1000) {
344 pr_warn("Warning: Giving up waiting to enable "
345 "relocation on exceptions (%u msec)!\n",
353 EXPORT_SYMBOL(pseries_enable_reloc_on_exc);
355 void pseries_disable_reloc_on_exc(void)
360 rc = disable_reloc_on_exceptions();
361 if (!H_IS_LONG_BUSY(rc))
363 mdelay(get_longbusy_msecs(rc));
366 pr_warning("Warning: Failed to disable relocation on "
367 "exceptions: %ld\n", rc);
369 EXPORT_SYMBOL(pseries_disable_reloc_on_exc);
371 #ifdef CONFIG_KEXEC_CORE
372 static void pSeries_machine_kexec(struct kimage *image)
374 if (firmware_has_feature(FW_FEATURE_SET_MODE))
375 pseries_disable_reloc_on_exc();
377 default_machine_kexec(image);
381 #ifdef __LITTLE_ENDIAN__
382 void pseries_big_endian_exceptions(void)
387 rc = enable_big_endian_exceptions();
388 if (!H_IS_LONG_BUSY(rc))
390 mdelay(get_longbusy_msecs(rc));
394 * At this point it is unlikely panic() will get anything
395 * out to the user, since this is called very late in kexec
396 * but at least this will stop us from continuing on further
397 * and creating an even more difficult to debug situation.
399 * There is a known problem when kdump'ing, if cpus are offline
400 * the above call will fail. Rather than panicking again, keep
401 * going and hope the kdump kernel is also little endian, which
404 if (rc && !kdump_in_progress())
405 panic("Could not enable big endian exceptions");
408 void pseries_little_endian_exceptions(void)
413 rc = enable_little_endian_exceptions();
414 if (!H_IS_LONG_BUSY(rc))
416 mdelay(get_longbusy_msecs(rc));
419 ppc_md.progress("H_SET_MODE LE exception fail", 0);
420 panic("Could not enable little endian exceptions");
425 static void __init find_and_init_phbs(void)
427 struct device_node *node;
428 struct pci_controller *phb;
429 struct device_node *root = of_find_node_by_path("/");
431 for_each_child_of_node(root, node) {
432 if (node->type == NULL || (strcmp(node->type, "pci") != 0 &&
433 strcmp(node->type, "pciex") != 0))
436 phb = pcibios_alloc_controller(node);
440 pci_process_bridge_OF_ranges(phb, node, 0);
441 isa_bridge_find_early(phb);
442 phb->controller_ops = pseries_pci_controller_ops;
448 * PCI_PROBE_ONLY and PCI_REASSIGN_ALL_BUS can be set via properties
451 of_pci_check_probe_only();
454 static void __init pSeries_setup_arch(void)
456 set_arch_panic_timeout(10, ARCH_PANIC_TIMEOUT);
458 /* Discover PIC type and setup ppc_md accordingly */
462 /* openpic global configuration register (64-bit format). */
463 /* openpic Interrupt Source Unit pointer (64-bit format). */
464 /* python0 facility area (mmio) (64-bit format) REAL address. */
466 /* init to some ~sane value until calibrate_delay() runs */
467 loops_per_jiffy = 50000000;
471 /* By default, only probe PCI (can be overridden by rtas_pci) */
472 pci_add_flags(PCI_PROBE_ONLY);
474 /* Find and initialize PCI host bridges */
475 init_pci_config_tokens();
476 find_and_init_phbs();
477 of_reconfig_notifier_register(&pci_dn_reconfig_nb);
479 pSeries_nvram_init();
481 if (firmware_has_feature(FW_FEATURE_LPAR)) {
482 vpa_init(boot_cpuid);
483 ppc_md.power_save = pseries_lpar_idle;
484 ppc_md.enable_pmcs = pseries_lpar_enable_pmcs;
486 /* No special idle routine */
487 ppc_md.enable_pmcs = power4_enable_pmcs;
490 ppc_md.pcibios_root_bridge_prepare = pseries_root_bridge_prepare;
493 static int __init pSeries_init_panel(void)
495 /* Manually leave the kernel version on the panel. */
496 #ifdef __BIG_ENDIAN__
497 ppc_md.progress("Linux ppc64\n", 0);
499 ppc_md.progress("Linux ppc64le\n", 0);
501 ppc_md.progress(init_utsname()->version, 0);
505 machine_arch_initcall(pseries, pSeries_init_panel);
507 static int pseries_set_dabr(unsigned long dabr, unsigned long dabrx)
509 return plpar_hcall_norets(H_SET_DABR, dabr);
512 static int pseries_set_xdabr(unsigned long dabr, unsigned long dabrx)
514 /* Have to set at least one bit in the DABRX according to PAPR */
515 if (dabrx == 0 && dabr == 0)
517 /* PAPR says we can only set kernel and user bits */
518 dabrx &= DABRX_KERNEL | DABRX_USER;
520 return plpar_hcall_norets(H_SET_XDABR, dabr, dabrx);
523 static int pseries_set_dawr(unsigned long dawr, unsigned long dawrx)
525 /* PAPR says we can't set HYP */
528 return plapr_set_watchpoint0(dawr, dawrx);
531 #define CMO_CHARACTERISTICS_TOKEN 44
532 #define CMO_MAXLENGTH 1026
534 void pSeries_coalesce_init(void)
536 struct hvcall_mpp_x_data mpp_x_data;
538 if (firmware_has_feature(FW_FEATURE_CMO) && !h_get_mpp_x(&mpp_x_data))
539 powerpc_firmware_features |= FW_FEATURE_XCMO;
541 powerpc_firmware_features &= ~FW_FEATURE_XCMO;
545 * fw_cmo_feature_init - FW_FEATURE_CMO is not stored in ibm,hypertas-functions,
546 * handle that here. (Stolen from parse_system_parameter_string)
548 static void pSeries_cmo_feature_init(void)
550 char *ptr, *key, *value, *end;
552 int page_order = IOMMU_PAGE_SHIFT_4K;
554 pr_debug(" -> fw_cmo_feature_init()\n");
555 spin_lock(&rtas_data_buf_lock);
556 memset(rtas_data_buf, 0, RTAS_DATA_BUF_SIZE);
557 call_status = rtas_call(rtas_token("ibm,get-system-parameter"), 3, 1,
559 CMO_CHARACTERISTICS_TOKEN,
563 if (call_status != 0) {
564 spin_unlock(&rtas_data_buf_lock);
565 pr_debug("CMO not available\n");
566 pr_debug(" <- fw_cmo_feature_init()\n");
570 end = rtas_data_buf + CMO_MAXLENGTH - 2;
571 ptr = rtas_data_buf + 2; /* step over strlen value */
574 while (*ptr && (ptr <= end)) {
575 /* Separate the key and value by replacing '=' with '\0' and
576 * point the value at the string after the '='
581 } else if (ptr[0] == '\0' || ptr[0] == ',') {
582 /* Terminate the string containing the key/value pair */
586 pr_debug("Malformed key/value pair\n");
587 /* Never found a '=', end processing */
591 if (0 == strcmp(key, "CMOPageSize"))
592 page_order = simple_strtol(value, NULL, 10);
593 else if (0 == strcmp(key, "PrPSP"))
594 CMO_PrPSP = simple_strtol(value, NULL, 10);
595 else if (0 == strcmp(key, "SecPSP"))
596 CMO_SecPSP = simple_strtol(value, NULL, 10);
597 value = key = ptr + 1;
602 /* Page size is returned as the power of 2 of the page size,
603 * convert to the page size in bytes before returning
605 CMO_PageSize = 1 << page_order;
606 pr_debug("CMO_PageSize = %lu\n", CMO_PageSize);
608 if (CMO_PrPSP != -1 || CMO_SecPSP != -1) {
609 pr_info("CMO enabled\n");
610 pr_debug("CMO enabled, PrPSP=%d, SecPSP=%d\n", CMO_PrPSP,
612 powerpc_firmware_features |= FW_FEATURE_CMO;
613 pSeries_coalesce_init();
615 pr_debug("CMO not enabled, PrPSP=%d, SecPSP=%d\n", CMO_PrPSP,
617 spin_unlock(&rtas_data_buf_lock);
618 pr_debug(" <- fw_cmo_feature_init()\n");
622 * Early initialization. Relocation is on but do not reference unbolted pages
624 static void __init pseries_init(void)
626 pr_debug(" -> pseries_init()\n");
628 #ifdef CONFIG_HVC_CONSOLE
629 if (firmware_has_feature(FW_FEATURE_LPAR))
630 hvc_vio_init_early();
632 if (firmware_has_feature(FW_FEATURE_XDABR))
633 ppc_md.set_dabr = pseries_set_xdabr;
634 else if (firmware_has_feature(FW_FEATURE_DABR))
635 ppc_md.set_dabr = pseries_set_dabr;
637 if (firmware_has_feature(FW_FEATURE_SET_MODE))
638 ppc_md.set_dawr = pseries_set_dawr;
640 pSeries_cmo_feature_init();
641 iommu_init_early_pSeries();
643 pr_debug(" <- pseries_init()\n");
647 * pseries_power_off - tell firmware about how to power off the system.
649 * This function calls either the power-off rtas token in normal cases
650 * or the ibm,power-off-ups token (if present & requested) in case of
651 * a power failure. If power-off token is used, power on will only be
652 * possible with power button press. If ibm,power-off-ups token is used
653 * it will allow auto poweron after power is restored.
655 static void pseries_power_off(void)
658 int rtas_poweroff_ups_token = rtas_token("ibm,power-off-ups");
660 if (rtas_flash_term_hook)
661 rtas_flash_term_hook(SYS_POWER_OFF);
663 if (rtas_poweron_auto == 0 ||
664 rtas_poweroff_ups_token == RTAS_UNKNOWN_SERVICE) {
665 rc = rtas_call(rtas_token("power-off"), 2, 1, NULL, -1, -1);
666 printk(KERN_INFO "RTAS power-off returned %d\n", rc);
668 rc = rtas_call(rtas_poweroff_ups_token, 0, 1, NULL);
669 printk(KERN_INFO "RTAS ibm,power-off-ups returned %d\n", rc);
674 static int __init pSeries_probe(void)
676 const char *dtype = of_get_property(of_root, "device_type", NULL);
680 if (strcmp(dtype, "chrp"))
683 /* Cell blades firmware claims to be chrp while it's not. Until this
684 * is fixed, we need to avoid those here.
686 if (of_machine_is_compatible("IBM,CPBW-1.0") ||
687 of_machine_is_compatible("IBM,CBEA"))
690 pm_power_off = pseries_power_off;
692 pr_debug("Machine is%s LPAR !\n",
693 (powerpc_firmware_features & FW_FEATURE_LPAR) ? "" : " not");
700 static int pSeries_pci_probe_mode(struct pci_bus *bus)
702 if (firmware_has_feature(FW_FEATURE_LPAR))
703 return PCI_PROBE_DEVTREE;
704 return PCI_PROBE_NORMAL;
707 struct pci_controller_ops pseries_pci_controller_ops = {
708 .probe_mode = pSeries_pci_probe_mode,
711 define_machine(pseries) {
713 .probe = pSeries_probe,
714 .setup_arch = pSeries_setup_arch,
715 .init_IRQ = pseries_init_irq,
716 .show_cpuinfo = pSeries_show_cpuinfo,
717 .log_error = pSeries_log_error,
718 .pcibios_fixup = pSeries_final_fixup,
719 .restart = rtas_restart,
721 .panic = rtas_os_term,
722 .get_boot_time = rtas_get_boot_time,
723 .get_rtc_time = rtas_get_rtc_time,
724 .set_rtc_time = rtas_set_rtc_time,
725 .calibrate_decr = generic_calibrate_decr,
726 .progress = rtas_progress,
727 .system_reset_exception = pSeries_system_reset_exception,
728 .machine_check_exception = pSeries_machine_check_exception,
729 #ifdef CONFIG_KEXEC_CORE
730 .machine_kexec = pSeries_machine_kexec,
731 .kexec_cpu_down = pseries_kexec_cpu_down,
733 #ifdef CONFIG_MEMORY_HOTPLUG_SPARSE
734 .memory_block_size = pseries_memory_block_size,