2 * Maple (970 eval board) setup code
4 * (c) Copyright 2004 Benjamin Herrenschmidt (benh@kernel.crashing.org),
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License
9 * as published by the Free Software Foundation; either version
10 * 2 of the License, or (at your option) any later version.
16 #include <linux/init.h>
17 #include <linux/errno.h>
18 #include <linux/sched.h>
19 #include <linux/kernel.h>
21 #include <linux/stddef.h>
22 #include <linux/unistd.h>
23 #include <linux/ptrace.h>
24 #include <linux/slab.h>
25 #include <linux/user.h>
26 #include <linux/tty.h>
27 #include <linux/string.h>
28 #include <linux/delay.h>
29 #include <linux/ioport.h>
30 #include <linux/major.h>
31 #include <linux/initrd.h>
32 #include <linux/vt_kern.h>
33 #include <linux/console.h>
34 #include <linux/pci.h>
35 #include <linux/adb.h>
36 #include <linux/cuda.h>
37 #include <linux/pmu.h>
38 #include <linux/irq.h>
39 #include <linux/seq_file.h>
40 #include <linux/root_dev.h>
41 #include <linux/serial.h>
42 #include <linux/smp.h>
43 #include <linux/bitops.h>
44 #include <linux/of_device.h>
45 #include <linux/lmb.h>
47 #include <asm/processor.h>
48 #include <asm/sections.h>
50 #include <asm/system.h>
51 #include <asm/pgtable.h>
53 #include <asm/kexec.h>
54 #include <asm/pci-bridge.h>
55 #include <asm/iommu.h>
56 #include <asm/machdep.h>
58 #include <asm/cputable.h>
63 #include <asm/nvram.h>
68 #define DBG(fmt...) udbg_printf(fmt)
73 static unsigned long maple_find_nvram_base(void)
75 struct device_node
*rtcs
;
76 unsigned long result
= 0;
78 /* find NVRAM device */
79 rtcs
= of_find_compatible_node(NULL
, "nvram", "AMD8111");
82 if (of_address_to_resource(rtcs
, 0, &r
)) {
83 printk(KERN_EMERG
"Maple: Unable to translate NVRAM"
87 if (!(r
.flags
& IORESOURCE_IO
)) {
88 printk(KERN_EMERG
"Maple: NVRAM address isn't PIO!\n");
93 printk(KERN_EMERG
"Maple: Unable to find NVRAM\n");
99 static void maple_restart(char *cmd
)
101 unsigned int maple_nvram_base
;
102 const unsigned int *maple_nvram_offset
, *maple_nvram_command
;
103 struct device_node
*sp
;
105 maple_nvram_base
= maple_find_nvram_base();
106 if (maple_nvram_base
== 0)
109 /* find service processor device */
110 sp
= of_find_node_by_name(NULL
, "service-processor");
112 printk(KERN_EMERG
"Maple: Unable to find Service Processor\n");
115 maple_nvram_offset
= of_get_property(sp
, "restart-addr", NULL
);
116 maple_nvram_command
= of_get_property(sp
, "restart-value", NULL
);
120 outb_p(*maple_nvram_command
, maple_nvram_base
+ *maple_nvram_offset
);
123 printk(KERN_EMERG
"Maple: Manual Restart Required\n");
126 static void maple_power_off(void)
128 unsigned int maple_nvram_base
;
129 const unsigned int *maple_nvram_offset
, *maple_nvram_command
;
130 struct device_node
*sp
;
132 maple_nvram_base
= maple_find_nvram_base();
133 if (maple_nvram_base
== 0)
136 /* find service processor device */
137 sp
= of_find_node_by_name(NULL
, "service-processor");
139 printk(KERN_EMERG
"Maple: Unable to find Service Processor\n");
142 maple_nvram_offset
= of_get_property(sp
, "power-off-addr", NULL
);
143 maple_nvram_command
= of_get_property(sp
, "power-off-value", NULL
);
147 outb_p(*maple_nvram_command
, maple_nvram_base
+ *maple_nvram_offset
);
150 printk(KERN_EMERG
"Maple: Manual Power-Down Required\n");
153 static void maple_halt(void)
159 struct smp_ops_t maple_smp_ops
= {
160 .probe
= smp_mpic_probe
,
161 .message_pass
= smp_mpic_message_pass
,
162 .kick_cpu
= smp_generic_kick_cpu
,
163 .setup_cpu
= smp_mpic_setup_cpu
,
164 .give_timebase
= smp_generic_give_timebase
,
165 .take_timebase
= smp_generic_take_timebase
,
167 #endif /* CONFIG_SMP */
169 static void __init
maple_use_rtas_reboot_and_halt_if_present(void)
171 if (rtas_service_present("system-reboot") &&
172 rtas_service_present("power-off")) {
173 ppc_md
.restart
= rtas_restart
;
174 ppc_md
.power_off
= rtas_power_off
;
175 ppc_md
.halt
= rtas_halt
;
179 void __init
maple_setup_arch(void)
181 /* init to some ~sane value until calibrate_delay() runs */
182 loops_per_jiffy
= 50000000;
184 /* Setup SMP callback */
186 smp_ops
= &maple_smp_ops
;
188 /* Lookup PCI hosts */
191 #ifdef CONFIG_DUMMY_CONSOLE
192 conswitchp
= &dummy_con
;
194 maple_use_rtas_reboot_and_halt_if_present();
196 printk(KERN_DEBUG
"Using native/NAP idle loop\n");
202 * Early initialization.
204 static void __init
maple_init_early(void)
206 DBG(" -> maple_init_early\n");
208 iommu_init_early_dart();
210 DBG(" <- maple_init_early\n");
214 * This is almost identical to pSeries and CHRP. We need to make that
215 * code generic at one point, with appropriate bits in the device-tree to
216 * identify the presence of an HT APIC
218 static void __init
maple_init_IRQ(void)
220 struct device_node
*root
, *np
, *mpic_node
= NULL
;
221 const unsigned int *opprop
;
222 unsigned long openpic_addr
= 0;
223 int naddr
, n
, i
, opplen
, has_isus
= 0;
225 unsigned int flags
= MPIC_PRIMARY
;
227 /* Locate MPIC in the device-tree. Note that there is a bug
228 * in Maple device-tree where the type of the controller is
229 * open-pic and not interrupt-controller
232 for_each_node_by_type(np
, "interrupt-controller")
233 if (of_device_is_compatible(np
, "open-pic")) {
237 if (mpic_node
== NULL
)
238 for_each_node_by_type(np
, "open-pic") {
242 if (mpic_node
== NULL
) {
244 "Failed to locate the MPIC interrupt controller\n");
248 /* Find address list in /platform-open-pic */
249 root
= of_find_node_by_path("/");
250 naddr
= of_n_addr_cells(root
);
251 opprop
= of_get_property(root
, "platform-open-pic", &opplen
);
253 openpic_addr
= of_read_number(opprop
, naddr
);
254 has_isus
= (opplen
> naddr
);
255 printk(KERN_DEBUG
"OpenPIC addr: %lx, has ISUs: %d\n",
256 openpic_addr
, has_isus
);
259 BUG_ON(openpic_addr
== 0);
261 /* Check for a big endian MPIC */
262 if (of_get_property(np
, "big-endian", NULL
) != NULL
)
263 flags
|= MPIC_BIG_ENDIAN
;
265 /* XXX Maple specific bits */
266 flags
|= MPIC_U3_HT_IRQS
| MPIC_WANTS_RESET
;
267 /* All U3/U4 are big-endian, older SLOF firmware doesn't encode this */
268 flags
|= MPIC_BIG_ENDIAN
;
270 /* Setup the openpic driver. More device-tree junks, we hard code no
271 * ISUs for now. I'll have to revisit some stuffs with the folks doing
272 * the firmware for those
274 mpic
= mpic_alloc(mpic_node
, openpic_addr
, flags
,
275 /*has_isus ? 16 :*/ 0, 0, " MPIC ");
276 BUG_ON(mpic
== NULL
);
279 opplen
/= sizeof(u32
);
280 for (n
= 0, i
= naddr
; i
< opplen
; i
+= naddr
, n
++) {
281 unsigned long isuaddr
= of_read_number(opprop
+ i
, naddr
);
282 mpic_assign_isu(mpic
, n
, isuaddr
);
285 /* All ISUs are setup, complete initialization */
287 ppc_md
.get_irq
= mpic_get_irq
;
288 of_node_put(mpic_node
);
292 static void __init
maple_progress(char *s
, unsigned short hex
)
294 printk("*** %04x : %s\n", hex
, s
? s
: "");
299 * Called very early, MMU is off, device-tree isn't unflattened
301 static int __init
maple_probe(void)
303 unsigned long root
= of_get_flat_dt_root();
305 if (!of_flat_dt_is_compatible(root
, "Momentum,Maple") &&
306 !of_flat_dt_is_compatible(root
, "Momentum,Apache"))
309 * On U3, the DART (iommu) must be allocated now since it
310 * has an impact on htab_initialize (due to the large page it
311 * occupies having to be broken up so the DART itself is not
312 * part of the cacheable linar mapping
321 define_machine(maple
) {
323 .probe
= maple_probe
,
324 .setup_arch
= maple_setup_arch
,
325 .init_early
= maple_init_early
,
326 .init_IRQ
= maple_init_IRQ
,
327 .pci_irq_fixup
= maple_pci_irq_fixup
,
328 .pci_get_legacy_ide_irq
= maple_pci_get_legacy_ide_irq
,
329 .restart
= maple_restart
,
330 .power_off
= maple_power_off
,
332 .get_boot_time
= maple_get_boot_time
,
333 .set_rtc_time
= maple_set_rtc_time
,
334 .get_rtc_time
= maple_get_rtc_time
,
335 .calibrate_decr
= generic_calibrate_decr
,
336 .progress
= maple_progress
,
337 .power_save
= power4_idle
,
339 .machine_kexec
= default_machine_kexec
,
340 .machine_kexec_prepare
= default_machine_kexec_prepare
,
341 .machine_crash_shutdown
= default_machine_crash_shutdown
,