1 /*
2 * 64-bit pSeries and RS/6000 setup code.
3 *
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
8 *
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.
13 */
14
15 /*
16 * bootup setup stuff..
17 */
18
19 #include <linux/cpu.h>
20 #include <linux/errno.h>
21 #include <linux/sched.h>
22 #include <linux/kernel.h>
23 #include <linux/mm.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>
42 #include <linux/of.h>
43 #include <linux/of_pci.h>
44
45 #include <asm/mmu.h>
46 #include <asm/processor.h>
47 #include <asm/io.h>
48 #include <asm/pgtable.h>
49 #include <asm/prom.h>
50 #include <asm/rtas.h>
51 #include <asm/pci-bridge.h>
52 #include <asm/iommu.h>
53 #include <asm/dma.h>
54 #include <asm/machdep.h>
55 #include <asm/irq.h>
56 #include <asm/time.h>
57 #include <asm/nvram.h>
58 #include <asm/pmc.h>
59 #include <asm/xics.h>
60 #include <asm/ppc-pci.h>
61 #include <asm/i8259.h>
62 #include <asm/udbg.h>
63 #include <asm/smp.h>
64 #include <asm/firmware.h>
65 #include <asm/eeh.h>
66 #include <asm/reg.h>
67 #include <asm/plpar_wrappers.h>
68 #include <asm/kexec.h>
69
70 #include "pseries.h"
71
72 int CMO_PrPSP = -1;
73 int CMO_SecPSP = -1;
74 unsigned long CMO_PageSize = (ASM_CONST(1) << IOMMU_PAGE_SHIFT_4K);
75 EXPORT_SYMBOL(CMO_PageSize);
76
77 int fwnmi_active; /* TRUE if an FWNMI handler is present */
78
pSeries_show_cpuinfo(struct seq_file * m)79 static void pSeries_show_cpuinfo(struct seq_file *m)
80 {
81 struct device_node *root;
82 const char *model = "";
83
84 root = of_find_node_by_path("/");
85 if (root)
86 model = of_get_property(root, "model", NULL);
87 seq_printf(m, "machine\t\t: CHRP %s\n", model);
88 of_node_put(root);
89 }
90
91 /* Initialize firmware assisted non-maskable interrupts if
92 * the firmware supports this feature.
93 */
fwnmi_init(void)94 static void __init fwnmi_init(void)
95 {
96 unsigned long system_reset_addr, machine_check_addr;
97
98 int ibm_nmi_register = rtas_token("ibm,nmi-register");
99 if (ibm_nmi_register == RTAS_UNKNOWN_SERVICE)
100 return;
101
102 /* If the kernel's not linked at zero we point the firmware at low
103 * addresses anyway, and use a trampoline to get to the real code. */
104 system_reset_addr = __pa(system_reset_fwnmi) - PHYSICAL_START;
105 machine_check_addr = __pa(machine_check_fwnmi) - PHYSICAL_START;
106
107 if (0 == rtas_call(ibm_nmi_register, 2, 1, NULL, system_reset_addr,
108 machine_check_addr))
109 fwnmi_active = 1;
110 }
111
pseries_8259_cascade(struct irq_desc * desc)112 static void pseries_8259_cascade(struct irq_desc *desc)
113 {
114 struct irq_chip *chip = irq_desc_get_chip(desc);
115 unsigned int cascade_irq = i8259_irq();
116
117 if (cascade_irq)
118 generic_handle_irq(cascade_irq);
119
120 chip->irq_eoi(&desc->irq_data);
121 }
122
pseries_setup_i8259_cascade(void)123 static void __init pseries_setup_i8259_cascade(void)
124 {
125 struct device_node *np, *old, *found = NULL;
126 unsigned int cascade;
127 const u32 *addrp;
128 unsigned long intack = 0;
129 int naddr;
130
131 for_each_node_by_type(np, "interrupt-controller") {
132 if (of_device_is_compatible(np, "chrp,iic")) {
133 found = np;
134 break;
135 }
136 }
137
138 if (found == NULL) {
139 printk(KERN_DEBUG "pic: no ISA interrupt controller\n");
140 return;
141 }
142
143 cascade = irq_of_parse_and_map(found, 0);
144 if (!cascade) {
145 printk(KERN_ERR "pic: failed to map cascade interrupt");
146 return;
147 }
148 pr_debug("pic: cascade mapped to irq %d\n", cascade);
149
150 for (old = of_node_get(found); old != NULL ; old = np) {
151 np = of_get_parent(old);
152 of_node_put(old);
153 if (np == NULL)
154 break;
155 if (strcmp(np->name, "pci") != 0)
156 continue;
157 addrp = of_get_property(np, "8259-interrupt-acknowledge", NULL);
158 if (addrp == NULL)
159 continue;
160 naddr = of_n_addr_cells(np);
161 intack = addrp[naddr-1];
162 if (naddr > 1)
163 intack |= ((unsigned long)addrp[naddr-2]) << 32;
164 }
165 if (intack)
166 printk(KERN_DEBUG "pic: PCI 8259 intack at 0x%016lx\n", intack);
167 i8259_init(found, intack);
168 of_node_put(found);
169 irq_set_chained_handler(cascade, pseries_8259_cascade);
170 }
171
pseries_init_irq(void)172 static void __init pseries_init_irq(void)
173 {
174 xics_init();
175 pseries_setup_i8259_cascade();
176 }
177
pseries_lpar_enable_pmcs(void)178 static void pseries_lpar_enable_pmcs(void)
179 {
180 unsigned long set, reset;
181
182 set = 1UL << 63;
183 reset = 0;
184 plpar_hcall_norets(H_PERFMON, set, reset);
185 }
186
pci_dn_reconfig_notifier(struct notifier_block * nb,unsigned long action,void * data)187 static int pci_dn_reconfig_notifier(struct notifier_block *nb, unsigned long action, void *data)
188 {
189 struct of_reconfig_data *rd = data;
190 struct device_node *parent, *np = rd->dn;
191 struct pci_dn *pdn;
192 int err = NOTIFY_OK;
193
194 switch (action) {
195 case OF_RECONFIG_ATTACH_NODE:
196 parent = of_get_parent(np);
197 pdn = parent ? PCI_DN(parent) : NULL;
198 if (pdn)
199 pci_add_device_node_info(pdn->phb, np);
200
201 of_node_put(parent);
202 break;
203 case OF_RECONFIG_DETACH_NODE:
204 pdn = PCI_DN(np);
205 if (pdn)
206 list_del(&pdn->list);
207 break;
208 default:
209 err = NOTIFY_DONE;
210 break;
211 }
212 return err;
213 }
214
215 static struct notifier_block pci_dn_reconfig_nb = {
216 .notifier_call = pci_dn_reconfig_notifier,
217 };
218
219 struct kmem_cache *dtl_cache;
220
221 #ifdef CONFIG_VIRT_CPU_ACCOUNTING_NATIVE
222 /*
223 * Allocate space for the dispatch trace log for all possible cpus
224 * and register the buffers with the hypervisor. This is used for
225 * computing time stolen by the hypervisor.
226 */
alloc_dispatch_logs(void)227 static int alloc_dispatch_logs(void)
228 {
229 int cpu, ret;
230 struct paca_struct *pp;
231 struct dtl_entry *dtl;
232
233 if (!firmware_has_feature(FW_FEATURE_SPLPAR))
234 return 0;
235
236 if (!dtl_cache)
237 return 0;
238
239 for_each_possible_cpu(cpu) {
240 pp = &paca[cpu];
241 dtl = kmem_cache_alloc(dtl_cache, GFP_KERNEL);
242 if (!dtl) {
243 pr_warn("Failed to allocate dispatch trace log for cpu %d\n",
244 cpu);
245 pr_warn("Stolen time statistics will be unreliable\n");
246 break;
247 }
248
249 pp->dtl_ridx = 0;
250 pp->dispatch_log = dtl;
251 pp->dispatch_log_end = dtl + N_DISPATCH_LOG;
252 pp->dtl_curr = dtl;
253 }
254
255 /* Register the DTL for the current (boot) cpu */
256 dtl = get_paca()->dispatch_log;
257 get_paca()->dtl_ridx = 0;
258 get_paca()->dtl_curr = dtl;
259 get_paca()->lppaca_ptr->dtl_idx = 0;
260
261 /* hypervisor reads buffer length from this field */
262 dtl->enqueue_to_dispatch_time = cpu_to_be32(DISPATCH_LOG_BYTES);
263 ret = register_dtl(hard_smp_processor_id(), __pa(dtl));
264 if (ret)
265 pr_err("WARNING: DTL registration of cpu %d (hw %d) failed "
266 "with %d\n", smp_processor_id(),
267 hard_smp_processor_id(), ret);
268 get_paca()->lppaca_ptr->dtl_enable_mask = 2;
269
270 return 0;
271 }
272 #else /* !CONFIG_VIRT_CPU_ACCOUNTING_NATIVE */
alloc_dispatch_logs(void)273 static inline int alloc_dispatch_logs(void)
274 {
275 return 0;
276 }
277 #endif /* CONFIG_VIRT_CPU_ACCOUNTING_NATIVE */
278
alloc_dispatch_log_kmem_cache(void)279 static int alloc_dispatch_log_kmem_cache(void)
280 {
281 dtl_cache = kmem_cache_create("dtl", DISPATCH_LOG_BYTES,
282 DISPATCH_LOG_BYTES, 0, NULL);
283 if (!dtl_cache) {
284 pr_warn("Failed to create dispatch trace log buffer cache\n");
285 pr_warn("Stolen time statistics will be unreliable\n");
286 return 0;
287 }
288
289 return alloc_dispatch_logs();
290 }
291 machine_early_initcall(pseries, alloc_dispatch_log_kmem_cache);
292
pseries_lpar_idle(void)293 static void pseries_lpar_idle(void)
294 {
295 /*
296 * Default handler to go into low thread priority and possibly
297 * low power mode by ceding processor to hypervisor
298 */
299
300 /* Indicate to hypervisor that we are idle. */
301 get_lppaca()->idle = 1;
302
303 /*
304 * Yield the processor to the hypervisor. We return if
305 * an external interrupt occurs (which are driven prior
306 * to returning here) or if a prod occurs from another
307 * processor. When returning here, external interrupts
308 * are enabled.
309 */
310 cede_processor();
311
312 get_lppaca()->idle = 0;
313 }
314
315 /*
316 * Enable relocation on during exceptions. This has partition wide scope and
317 * may take a while to complete, if it takes longer than one second we will
318 * just give up rather than wasting any more time on this - if that turns out
319 * to ever be a problem in practice we can move this into a kernel thread to
320 * finish off the process later in boot.
321 */
pseries_enable_reloc_on_exc(void)322 void pseries_enable_reloc_on_exc(void)
323 {
324 long rc;
325 unsigned int delay, total_delay = 0;
326
327 while (1) {
328 rc = enable_reloc_on_exceptions();
329 if (!H_IS_LONG_BUSY(rc)) {
330 if (rc == H_P2) {
331 pr_info("Relocation on exceptions not"
332 " supported\n");
333 } else if (rc != H_SUCCESS) {
334 pr_warn("Unable to enable relocation"
335 " on exceptions: %ld\n", rc);
336 }
337 break;
338 }
339
340 delay = get_longbusy_msecs(rc);
341 total_delay += delay;
342 if (total_delay > 1000) {
343 pr_warn("Warning: Giving up waiting to enable "
344 "relocation on exceptions (%u msec)!\n",
345 total_delay);
346 return;
347 }
348
349 mdelay(delay);
350 }
351 }
352 EXPORT_SYMBOL(pseries_enable_reloc_on_exc);
353
pseries_disable_reloc_on_exc(void)354 void pseries_disable_reloc_on_exc(void)
355 {
356 long rc;
357
358 while (1) {
359 rc = disable_reloc_on_exceptions();
360 if (!H_IS_LONG_BUSY(rc))
361 break;
362 mdelay(get_longbusy_msecs(rc));
363 }
364 if (rc != H_SUCCESS)
365 pr_warning("Warning: Failed to disable relocation on "
366 "exceptions: %ld\n", rc);
367 }
368 EXPORT_SYMBOL(pseries_disable_reloc_on_exc);
369
370 #ifdef CONFIG_KEXEC
pSeries_machine_kexec(struct kimage * image)371 static void pSeries_machine_kexec(struct kimage *image)
372 {
373 if (firmware_has_feature(FW_FEATURE_SET_MODE))
374 pseries_disable_reloc_on_exc();
375
376 default_machine_kexec(image);
377 }
378 #endif
379
380 #ifdef __LITTLE_ENDIAN__
pseries_big_endian_exceptions(void)381 void pseries_big_endian_exceptions(void)
382 {
383 long rc;
384
385 while (1) {
386 rc = enable_big_endian_exceptions();
387 if (!H_IS_LONG_BUSY(rc))
388 break;
389 mdelay(get_longbusy_msecs(rc));
390 }
391
392 /*
393 * At this point it is unlikely panic() will get anything
394 * out to the user, since this is called very late in kexec
395 * but at least this will stop us from continuing on further
396 * and creating an even more difficult to debug situation.
397 *
398 * There is a known problem when kdump'ing, if cpus are offline
399 * the above call will fail. Rather than panicking again, keep
400 * going and hope the kdump kernel is also little endian, which
401 * it usually is.
402 */
403 if (rc && !kdump_in_progress())
404 panic("Could not enable big endian exceptions");
405 }
406
pseries_little_endian_exceptions(void)407 void pseries_little_endian_exceptions(void)
408 {
409 long rc;
410
411 while (1) {
412 rc = enable_little_endian_exceptions();
413 if (!H_IS_LONG_BUSY(rc))
414 break;
415 mdelay(get_longbusy_msecs(rc));
416 }
417 if (rc) {
418 ppc_md.progress("H_SET_MODE LE exception fail", 0);
419 panic("Could not enable little endian exceptions");
420 }
421 }
422 #endif
423
find_and_init_phbs(void)424 static void __init find_and_init_phbs(void)
425 {
426 struct device_node *node;
427 struct pci_controller *phb;
428 struct device_node *root = of_find_node_by_path("/");
429
430 for_each_child_of_node(root, node) {
431 if (node->type == NULL || (strcmp(node->type, "pci") != 0 &&
432 strcmp(node->type, "pciex") != 0))
433 continue;
434
435 phb = pcibios_alloc_controller(node);
436 if (!phb)
437 continue;
438 rtas_setup_phb(phb);
439 pci_process_bridge_OF_ranges(phb, node, 0);
440 isa_bridge_find_early(phb);
441 phb->controller_ops = pseries_pci_controller_ops;
442 }
443
444 of_node_put(root);
445
446 /*
447 * PCI_PROBE_ONLY and PCI_REASSIGN_ALL_BUS can be set via properties
448 * in chosen.
449 */
450 of_pci_check_probe_only();
451 }
452
pseries_setup_rfi_flush(void)453 static void pseries_setup_rfi_flush(void)
454 {
455 struct h_cpu_char_result result;
456 enum l1d_flush_type types;
457 bool enable;
458 long rc;
459
460 /* Enable by default */
461 enable = true;
462
463 rc = plpar_get_cpu_characteristics(&result);
464 if (rc == H_SUCCESS) {
465 types = L1D_FLUSH_NONE;
466
467 if (result.character & H_CPU_CHAR_L1D_FLUSH_TRIG2)
468 types |= L1D_FLUSH_MTTRIG;
469 if (result.character & H_CPU_CHAR_L1D_FLUSH_ORI30)
470 types |= L1D_FLUSH_ORI;
471
472 /* Use fallback if nothing set in hcall */
473 if (types == L1D_FLUSH_NONE)
474 types = L1D_FLUSH_FALLBACK;
475
476 if (!(result.behaviour & H_CPU_BEHAV_L1D_FLUSH_PR))
477 enable = false;
478 } else {
479 /* Default to fallback if case hcall is not available */
480 types = L1D_FLUSH_FALLBACK;
481 }
482
483 setup_rfi_flush(types, enable);
484 }
485
pSeries_setup_arch(void)486 static void __init pSeries_setup_arch(void)
487 {
488 set_arch_panic_timeout(10, ARCH_PANIC_TIMEOUT);
489
490 /* Discover PIC type and setup ppc_md accordingly */
491 smp_init_pseries();
492
493
494 /* openpic global configuration register (64-bit format). */
495 /* openpic Interrupt Source Unit pointer (64-bit format). */
496 /* python0 facility area (mmio) (64-bit format) REAL address. */
497
498 /* init to some ~sane value until calibrate_delay() runs */
499 loops_per_jiffy = 50000000;
500
501 fwnmi_init();
502
503 pseries_setup_rfi_flush();
504
505 /* By default, only probe PCI (can be overridden by rtas_pci) */
506 pci_add_flags(PCI_PROBE_ONLY);
507
508 /* Find and initialize PCI host bridges */
509 init_pci_config_tokens();
510 find_and_init_phbs();
511 of_reconfig_notifier_register(&pci_dn_reconfig_nb);
512
513 pSeries_nvram_init();
514
515 if (firmware_has_feature(FW_FEATURE_LPAR)) {
516 vpa_init(boot_cpuid);
517 ppc_md.power_save = pseries_lpar_idle;
518 ppc_md.enable_pmcs = pseries_lpar_enable_pmcs;
519 } else {
520 /* No special idle routine */
521 ppc_md.enable_pmcs = power4_enable_pmcs;
522 }
523
524 ppc_md.pcibios_root_bridge_prepare = pseries_root_bridge_prepare;
525 }
526
pSeries_init_panel(void)527 static int __init pSeries_init_panel(void)
528 {
529 /* Manually leave the kernel version on the panel. */
530 #ifdef __BIG_ENDIAN__
531 ppc_md.progress("Linux ppc64\n", 0);
532 #else
533 ppc_md.progress("Linux ppc64le\n", 0);
534 #endif
535 ppc_md.progress(init_utsname()->version, 0);
536
537 return 0;
538 }
539 machine_arch_initcall(pseries, pSeries_init_panel);
540
pseries_set_dabr(unsigned long dabr,unsigned long dabrx)541 static int pseries_set_dabr(unsigned long dabr, unsigned long dabrx)
542 {
543 return plpar_hcall_norets(H_SET_DABR, dabr);
544 }
545
pseries_set_xdabr(unsigned long dabr,unsigned long dabrx)546 static int pseries_set_xdabr(unsigned long dabr, unsigned long dabrx)
547 {
548 /* Have to set at least one bit in the DABRX according to PAPR */
549 if (dabrx == 0 && dabr == 0)
550 dabrx = DABRX_USER;
551 /* PAPR says we can only set kernel and user bits */
552 dabrx &= DABRX_KERNEL | DABRX_USER;
553
554 return plpar_hcall_norets(H_SET_XDABR, dabr, dabrx);
555 }
556
pseries_set_dawr(unsigned long dawr,unsigned long dawrx)557 static int pseries_set_dawr(unsigned long dawr, unsigned long dawrx)
558 {
559 /* PAPR says we can't set HYP */
560 dawrx &= ~DAWRX_HYP;
561
562 return plapr_set_watchpoint0(dawr, dawrx);
563 }
564
565 #define CMO_CHARACTERISTICS_TOKEN 44
566 #define CMO_MAXLENGTH 1026
567
pSeries_coalesce_init(void)568 void pSeries_coalesce_init(void)
569 {
570 struct hvcall_mpp_x_data mpp_x_data;
571
572 if (firmware_has_feature(FW_FEATURE_CMO) && !h_get_mpp_x(&mpp_x_data))
573 powerpc_firmware_features |= FW_FEATURE_XCMO;
574 else
575 powerpc_firmware_features &= ~FW_FEATURE_XCMO;
576 }
577
578 /**
579 * fw_cmo_feature_init - FW_FEATURE_CMO is not stored in ibm,hypertas-functions,
580 * handle that here. (Stolen from parse_system_parameter_string)
581 */
pSeries_cmo_feature_init(void)582 static void pSeries_cmo_feature_init(void)
583 {
584 char *ptr, *key, *value, *end;
585 int call_status;
586 int page_order = IOMMU_PAGE_SHIFT_4K;
587
588 pr_debug(" -> fw_cmo_feature_init()\n");
589 spin_lock(&rtas_data_buf_lock);
590 memset(rtas_data_buf, 0, RTAS_DATA_BUF_SIZE);
591 call_status = rtas_call(rtas_token("ibm,get-system-parameter"), 3, 1,
592 NULL,
593 CMO_CHARACTERISTICS_TOKEN,
594 __pa(rtas_data_buf),
595 RTAS_DATA_BUF_SIZE);
596
597 if (call_status != 0) {
598 spin_unlock(&rtas_data_buf_lock);
599 pr_debug("CMO not available\n");
600 pr_debug(" <- fw_cmo_feature_init()\n");
601 return;
602 }
603
604 end = rtas_data_buf + CMO_MAXLENGTH - 2;
605 ptr = rtas_data_buf + 2; /* step over strlen value */
606 key = value = ptr;
607
608 while (*ptr && (ptr <= end)) {
609 /* Separate the key and value by replacing '=' with '\0' and
610 * point the value at the string after the '='
611 */
612 if (ptr[0] == '=') {
613 ptr[0] = '\0';
614 value = ptr + 1;
615 } else if (ptr[0] == '\0' || ptr[0] == ',') {
616 /* Terminate the string containing the key/value pair */
617 ptr[0] = '\0';
618
619 if (key == value) {
620 pr_debug("Malformed key/value pair\n");
621 /* Never found a '=', end processing */
622 break;
623 }
624
625 if (0 == strcmp(key, "CMOPageSize"))
626 page_order = simple_strtol(value, NULL, 10);
627 else if (0 == strcmp(key, "PrPSP"))
628 CMO_PrPSP = simple_strtol(value, NULL, 10);
629 else if (0 == strcmp(key, "SecPSP"))
630 CMO_SecPSP = simple_strtol(value, NULL, 10);
631 value = key = ptr + 1;
632 }
633 ptr++;
634 }
635
636 /* Page size is returned as the power of 2 of the page size,
637 * convert to the page size in bytes before returning
638 */
639 CMO_PageSize = 1 << page_order;
640 pr_debug("CMO_PageSize = %lu\n", CMO_PageSize);
641
642 if (CMO_PrPSP != -1 || CMO_SecPSP != -1) {
643 pr_info("CMO enabled\n");
644 pr_debug("CMO enabled, PrPSP=%d, SecPSP=%d\n", CMO_PrPSP,
645 CMO_SecPSP);
646 powerpc_firmware_features |= FW_FEATURE_CMO;
647 pSeries_coalesce_init();
648 } else
649 pr_debug("CMO not enabled, PrPSP=%d, SecPSP=%d\n", CMO_PrPSP,
650 CMO_SecPSP);
651 spin_unlock(&rtas_data_buf_lock);
652 pr_debug(" <- fw_cmo_feature_init()\n");
653 }
654
655 /*
656 * Early initialization. Relocation is on but do not reference unbolted pages
657 */
pseries_init(void)658 static void __init pseries_init(void)
659 {
660 pr_debug(" -> pseries_init()\n");
661
662 #ifdef CONFIG_HVC_CONSOLE
663 if (firmware_has_feature(FW_FEATURE_LPAR))
664 hvc_vio_init_early();
665 #endif
666 if (firmware_has_feature(FW_FEATURE_XDABR))
667 ppc_md.set_dabr = pseries_set_xdabr;
668 else if (firmware_has_feature(FW_FEATURE_DABR))
669 ppc_md.set_dabr = pseries_set_dabr;
670
671 if (firmware_has_feature(FW_FEATURE_SET_MODE))
672 ppc_md.set_dawr = pseries_set_dawr;
673
674 pSeries_cmo_feature_init();
675 iommu_init_early_pSeries();
676
677 pr_debug(" <- pseries_init()\n");
678 }
679
680 /**
681 * pseries_power_off - tell firmware about how to power off the system.
682 *
683 * This function calls either the power-off rtas token in normal cases
684 * or the ibm,power-off-ups token (if present & requested) in case of
685 * a power failure. If power-off token is used, power on will only be
686 * possible with power button press. If ibm,power-off-ups token is used
687 * it will allow auto poweron after power is restored.
688 */
pseries_power_off(void)689 static void pseries_power_off(void)
690 {
691 int rc;
692 int rtas_poweroff_ups_token = rtas_token("ibm,power-off-ups");
693
694 if (rtas_flash_term_hook)
695 rtas_flash_term_hook(SYS_POWER_OFF);
696
697 if (rtas_poweron_auto == 0 ||
698 rtas_poweroff_ups_token == RTAS_UNKNOWN_SERVICE) {
699 rc = rtas_call(rtas_token("power-off"), 2, 1, NULL, -1, -1);
700 printk(KERN_INFO "RTAS power-off returned %d\n", rc);
701 } else {
702 rc = rtas_call(rtas_poweroff_ups_token, 0, 1, NULL);
703 printk(KERN_INFO "RTAS ibm,power-off-ups returned %d\n", rc);
704 }
705 for (;;);
706 }
707
pSeries_probe(void)708 static int __init pSeries_probe(void)
709 {
710 const char *dtype = of_get_property(of_root, "device_type", NULL);
711
712 if (dtype == NULL)
713 return 0;
714 if (strcmp(dtype, "chrp"))
715 return 0;
716
717 /* Cell blades firmware claims to be chrp while it's not. Until this
718 * is fixed, we need to avoid those here.
719 */
720 if (of_machine_is_compatible("IBM,CPBW-1.0") ||
721 of_machine_is_compatible("IBM,CBEA"))
722 return 0;
723
724 pm_power_off = pseries_power_off;
725
726 pr_debug("Machine is%s LPAR !\n",
727 (powerpc_firmware_features & FW_FEATURE_LPAR) ? "" : " not");
728
729 pseries_init();
730
731 return 1;
732 }
733
pSeries_pci_probe_mode(struct pci_bus * bus)734 static int pSeries_pci_probe_mode(struct pci_bus *bus)
735 {
736 if (firmware_has_feature(FW_FEATURE_LPAR))
737 return PCI_PROBE_DEVTREE;
738 return PCI_PROBE_NORMAL;
739 }
740
741 struct pci_controller_ops pseries_pci_controller_ops = {
742 .probe_mode = pSeries_pci_probe_mode,
743 };
744
define_machine(pseries)745 define_machine(pseries) {
746 .name = "pSeries",
747 .probe = pSeries_probe,
748 .setup_arch = pSeries_setup_arch,
749 .init_IRQ = pseries_init_irq,
750 .show_cpuinfo = pSeries_show_cpuinfo,
751 .log_error = pSeries_log_error,
752 .pcibios_fixup = pSeries_final_fixup,
753 .restart = rtas_restart,
754 .halt = rtas_halt,
755 .panic = rtas_os_term,
756 .get_boot_time = rtas_get_boot_time,
757 .get_rtc_time = rtas_get_rtc_time,
758 .set_rtc_time = rtas_set_rtc_time,
759 .calibrate_decr = generic_calibrate_decr,
760 .progress = rtas_progress,
761 .system_reset_exception = pSeries_system_reset_exception,
762 .machine_check_exception = pSeries_machine_check_exception,
763 #ifdef CONFIG_KEXEC
764 .machine_kexec = pSeries_machine_kexec,
765 .kexec_cpu_down = pseries_kexec_cpu_down,
766 #endif
767 #ifdef CONFIG_MEMORY_HOTPLUG_SPARSE
768 .memory_block_size = pseries_memory_block_size,
769 #endif
770 };
771