1 /*
2  * Copyright (C) 2009 Extreme Engineering Solutions, Inc.
3  *
4  * X-ES board-specific functionality
5  *
6  * Based on mpc85xx_ds code from Freescale Semiconductor, Inc.
7  *
8  * Author: Nate Case <ncase@xes-inc.com>
9  *
10  * This is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License version 2 as
12  * published by the Free Software Foundation.
13  */
14 
15 #include <linux/stddef.h>
16 #include <linux/kernel.h>
17 #include <linux/pci.h>
18 #include <linux/kdev_t.h>
19 #include <linux/delay.h>
20 #include <linux/seq_file.h>
21 #include <linux/interrupt.h>
22 #include <linux/of_platform.h>
23 
24 #include <asm/time.h>
25 #include <asm/machdep.h>
26 #include <asm/pci-bridge.h>
27 #include <mm/mmu_decl.h>
28 #include <asm/prom.h>
29 #include <asm/udbg.h>
30 #include <asm/mpic.h>
31 
32 #include <sysdev/fsl_soc.h>
33 #include <sysdev/fsl_pci.h>
34 #include "smp.h"
35 
36 #include "mpc85xx.h"
37 
38 /* A few bit definitions needed for fixups on some boards */
39 #define MPC85xx_L2CTL_L2E		0x80000000 /* L2 enable */
40 #define MPC85xx_L2CTL_L2I		0x40000000 /* L2 flash invalidate */
41 #define MPC85xx_L2CTL_L2SIZ_MASK	0x30000000 /* L2 SRAM size (R/O) */
42 
43 void __init xes_mpc85xx_pic_init(void)
44 {
45 	struct mpic *mpic = mpic_alloc(NULL, 0, MPIC_BIG_ENDIAN,
46 			0, 256, " OpenPIC  ");
47 	BUG_ON(mpic == NULL);
48 	mpic_init(mpic);
49 }
50 
51 static void xes_mpc85xx_configure_l2(void __iomem *l2_base)
52 {
53 	volatile uint32_t ctl, tmp;
54 
55 	asm volatile("msync; isync");
56 	tmp = in_be32(l2_base);
57 
58 	/*
59 	 * xMon may have enabled part of L2 as SRAM, so we need to set it
60 	 * up for all cache mode just to be safe.
61 	 */
62 	printk(KERN_INFO "xes_mpc85xx: Enabling L2 as cache\n");
63 
64 	ctl = MPC85xx_L2CTL_L2E | MPC85xx_L2CTL_L2I;
65 	if (of_machine_is_compatible("MPC8540") ||
66 	    of_machine_is_compatible("MPC8560"))
67 		/*
68 		 * Assume L2 SRAM is used fully for cache, so set
69 		 * L2BLKSZ (bits 4:5) to match L2SIZ (bits 2:3).
70 		 */
71 		ctl |= (tmp & MPC85xx_L2CTL_L2SIZ_MASK) >> 2;
72 
73 	asm volatile("msync; isync");
74 	out_be32(l2_base, ctl);
75 	asm volatile("msync; isync");
76 }
77 
78 static void xes_mpc85xx_fixups(void)
79 {
80 	struct device_node *np;
81 	int err;
82 
83 	/*
84 	 * Legacy xMon firmware on some X-ES boards does not enable L2
85 	 * as cache.  We must ensure that they get enabled here.
86 	 */
87 	for_each_node_by_name(np, "l2-cache-controller") {
88 		struct resource r[2];
89 		void __iomem *l2_base;
90 
91 		/* Only MPC8548, MPC8540, and MPC8560 boards are affected */
92 		if (!of_device_is_compatible(np,
93 				    "fsl,mpc8548-l2-cache-controller") &&
94 		    !of_device_is_compatible(np,
95 				    "fsl,mpc8540-l2-cache-controller") &&
96 		    !of_device_is_compatible(np,
97 				    "fsl,mpc8560-l2-cache-controller"))
98 			continue;
99 
100 		err = of_address_to_resource(np, 0, &r[0]);
101 		if (err) {
102 			printk(KERN_WARNING "xes_mpc85xx: Could not get "
103 			       "resource for device tree node '%s'",
104 			       np->full_name);
105 			continue;
106 		}
107 
108 		l2_base = ioremap(r[0].start, resource_size(&r[0]));
109 
110 		xes_mpc85xx_configure_l2(l2_base);
111 	}
112 }
113 
114 /*
115  * Setup the architecture
116  */
117 static void __init xes_mpc85xx_setup_arch(void)
118 {
119 	struct device_node *root;
120 	const char *model = "Unknown";
121 
122 	root = of_find_node_by_path("/");
123 	if (root == NULL)
124 		return;
125 
126 	model = of_get_property(root, "model", NULL);
127 
128 	printk(KERN_INFO "X-ES MPC85xx-based single-board computer: %s\n",
129 	       model + strlen("xes,"));
130 
131 	xes_mpc85xx_fixups();
132 
133 	mpc85xx_smp_init();
134 
135 	fsl_pci_assign_primary();
136 }
137 
138 machine_arch_initcall(xes_mpc8572, mpc85xx_common_publish_devices);
139 machine_arch_initcall(xes_mpc8548, mpc85xx_common_publish_devices);
140 machine_arch_initcall(xes_mpc8540, mpc85xx_common_publish_devices);
141 
142 /*
143  * Called very early, device-tree isn't unflattened
144  */
145 static int __init xes_mpc8572_probe(void)
146 {
147 	unsigned long root = of_get_flat_dt_root();
148 
149 	return of_flat_dt_is_compatible(root, "xes,MPC8572");
150 }
151 
152 static int __init xes_mpc8548_probe(void)
153 {
154 	unsigned long root = of_get_flat_dt_root();
155 
156 	return of_flat_dt_is_compatible(root, "xes,MPC8548");
157 }
158 
159 static int __init xes_mpc8540_probe(void)
160 {
161 	unsigned long root = of_get_flat_dt_root();
162 
163 	return of_flat_dt_is_compatible(root, "xes,MPC8540");
164 }
165 
166 define_machine(xes_mpc8572) {
167 	.name			= "X-ES MPC8572",
168 	.probe			= xes_mpc8572_probe,
169 	.setup_arch		= xes_mpc85xx_setup_arch,
170 	.init_IRQ		= xes_mpc85xx_pic_init,
171 #ifdef CONFIG_PCI
172 	.pcibios_fixup_bus	= fsl_pcibios_fixup_bus,
173 	.pcibios_fixup_phb      = fsl_pcibios_fixup_phb,
174 #endif
175 	.get_irq		= mpic_get_irq,
176 	.restart		= fsl_rstcr_restart,
177 	.calibrate_decr		= generic_calibrate_decr,
178 	.progress		= udbg_progress,
179 };
180 
181 define_machine(xes_mpc8548) {
182 	.name			= "X-ES MPC8548",
183 	.probe			= xes_mpc8548_probe,
184 	.setup_arch		= xes_mpc85xx_setup_arch,
185 	.init_IRQ		= xes_mpc85xx_pic_init,
186 #ifdef CONFIG_PCI
187 	.pcibios_fixup_bus	= fsl_pcibios_fixup_bus,
188 	.pcibios_fixup_phb      = fsl_pcibios_fixup_phb,
189 #endif
190 	.get_irq		= mpic_get_irq,
191 	.restart		= fsl_rstcr_restart,
192 	.calibrate_decr		= generic_calibrate_decr,
193 	.progress		= udbg_progress,
194 };
195 
196 define_machine(xes_mpc8540) {
197 	.name			= "X-ES MPC8540",
198 	.probe			= xes_mpc8540_probe,
199 	.setup_arch		= xes_mpc85xx_setup_arch,
200 	.init_IRQ		= xes_mpc85xx_pic_init,
201 #ifdef CONFIG_PCI
202 	.pcibios_fixup_bus	= fsl_pcibios_fixup_bus,
203 	.pcibios_fixup_phb      = fsl_pcibios_fixup_phb,
204 #endif
205 	.get_irq		= mpic_get_irq,
206 	.restart		= fsl_rstcr_restart,
207 	.calibrate_decr		= generic_calibrate_decr,
208 	.progress		= udbg_progress,
209 };
210