mp_cpudep.c revision 209975
1/*-
2 * Copyright (c) 2008 Marcel Moolenaar
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 *
9 * 1. Redistributions of source code must retain the above copyright
10 *    notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25 */
26
27#include <sys/cdefs.h>
28__FBSDID("$FreeBSD: head/sys/powerpc/aim/mp_cpudep.c 209975 2010-07-13 05:32:19Z nwhitehorn $");
29
30#include <sys/param.h>
31#include <sys/systm.h>
32#include <sys/kernel.h>
33#include <sys/bus.h>
34#include <sys/pcpu.h>
35#include <sys/proc.h>
36#include <sys/smp.h>
37
38#include <machine/bus.h>
39#include <machine/cpu.h>
40#include <machine/hid.h>
41#include <machine/intr_machdep.h>
42#include <machine/pcb.h>
43#include <machine/psl.h>
44#include <machine/smp.h>
45#include <machine/spr.h>
46#include <machine/trap_aim.h>
47
48#include <dev/ofw/openfirm.h>
49#include <machine/ofw_machdep.h>
50
51void *ap_pcpu;
52
53static register_t bsp_state[8] __aligned(8);
54
55static void cpudep_save_config(void *dummy);
56SYSINIT(cpu_save_config, SI_SUB_CPU, SI_ORDER_ANY, cpudep_save_config, NULL);
57
58void
59cpudep_ap_early_bootstrap(void)
60{
61	register_t reg;
62
63	__asm __volatile("mtsprg 0, %0" :: "r"(ap_pcpu));
64	powerpc_sync();
65
66	switch (mfpvr() >> 16) {
67	case IBM970:
68	case IBM970FX:
69	case IBM970MP:
70		/* Restore HID4 and HID5, which are necessary for the MMU */
71
72		__asm __volatile("ld %0, 16(%2); sync; isync;	\
73		    mtspr %1, %0; sync; isync;"
74		    : "=r"(reg) : "K"(SPR_HID4), "r"(bsp_state));
75		__asm __volatile("ld %0, 24(%2); sync; isync;	\
76		    mtspr %1, %0; sync; isync;"
77		    : "=r"(reg) : "K"(SPR_HID5), "r"(bsp_state));
78		powerpc_sync();
79		break;
80	}
81}
82
83uintptr_t
84cpudep_ap_bootstrap(void)
85{
86	register_t msr, sp;
87
88	msr = PSL_KERNSET & ~PSL_EE;
89	mtmsr(msr);
90	isync();
91
92	pcpup->pc_curthread = pcpup->pc_idlethread;
93	pcpup->pc_curpcb = pcpup->pc_curthread->td_pcb;
94	sp = pcpup->pc_curpcb->pcb_sp;
95
96	return (sp);
97}
98
99static register_t
100mpc74xx_l2_enable(register_t l2cr_config)
101{
102	register_t ccr, bit;
103	uint16_t	vers;
104
105	vers = mfpvr() >> 16;
106	switch (vers) {
107	case MPC7400:
108	case MPC7410:
109		bit = L2CR_L2IP;
110		break;
111	default:
112		bit = L2CR_L2I;
113		break;
114	}
115
116	ccr = mfspr(SPR_L2CR);
117	if (ccr & L2CR_L2E)
118		return (ccr);
119
120	/* Configure L2 cache. */
121	ccr = l2cr_config & ~L2CR_L2E;
122	mtspr(SPR_L2CR, ccr | L2CR_L2I);
123	do {
124		ccr = mfspr(SPR_L2CR);
125	} while (ccr & bit);
126	powerpc_sync();
127	mtspr(SPR_L2CR, l2cr_config);
128	powerpc_sync();
129
130	return (l2cr_config);
131}
132
133static register_t
134mpc745x_l3_enable(register_t l3cr_config)
135{
136	register_t ccr;
137
138	ccr = mfspr(SPR_L3CR);
139	if (ccr & L3CR_L3E)
140		return (ccr);
141
142	/* Configure L3 cache. */
143	ccr = l3cr_config & ~(L3CR_L3E | L3CR_L3I | L3CR_L3PE | L3CR_L3CLKEN);
144	mtspr(SPR_L3CR, ccr);
145	ccr |= 0x4000000;       /* Magic, but documented. */
146	mtspr(SPR_L3CR, ccr);
147	ccr |= L3CR_L3CLKEN;
148	mtspr(SPR_L3CR, ccr);
149	mtspr(SPR_L3CR, ccr | L3CR_L3I);
150	while (mfspr(SPR_L3CR) & L3CR_L3I)
151		;
152	mtspr(SPR_L3CR, ccr & ~L3CR_L3CLKEN);
153	powerpc_sync();
154	DELAY(100);
155	mtspr(SPR_L3CR, ccr);
156	powerpc_sync();
157	DELAY(100);
158	ccr |= L3CR_L3E;
159	mtspr(SPR_L3CR, ccr);
160	powerpc_sync();
161
162	return(ccr);
163}
164
165static register_t
166mpc74xx_l1d_enable(void)
167{
168	register_t hid;
169
170	hid = mfspr(SPR_HID0);
171	if (hid & HID0_DCE)
172		return (hid);
173
174	/* Enable L1 D-cache */
175	hid |= HID0_DCE;
176	powerpc_sync();
177	mtspr(SPR_HID0, hid | HID0_DCFI);
178	powerpc_sync();
179
180	return (hid);
181}
182
183static register_t
184mpc74xx_l1i_enable(void)
185{
186	register_t hid;
187
188	hid = mfspr(SPR_HID0);
189	if (hid & HID0_ICE)
190		return (hid);
191
192	/* Enable L1 I-cache */
193	hid |= HID0_ICE;
194	isync();
195	mtspr(SPR_HID0, hid | HID0_ICFI);
196	isync();
197
198	return (hid);
199}
200
201static void
202cpudep_save_config(void *dummy)
203{
204	uint16_t	vers;
205
206	vers = mfpvr() >> 16;
207
208	switch(vers) {
209	case IBM970:
210	case IBM970FX:
211	case IBM970MP:
212		#ifdef __powerpc64__
213		bsp_state[0] = mfspr(SPR_HID0);
214		bsp_state[1] = mfspr(SPR_HID1);
215		bsp_state[2] = mfspr(SPR_HID4);
216		bsp_state[3] = mfspr(SPR_HID5);
217		#else
218		__asm __volatile ("mfspr %0,%2; mr %1,%0; srdi %0,%0,32"
219		    : "=r" (bsp_state[0]),"=r" (bsp_state[1]) : "K" (SPR_HID0));
220		__asm __volatile ("mfspr %0,%2; mr %1,%0; srdi %0,%0,32"
221		    : "=r" (bsp_state[2]),"=r" (bsp_state[3]) : "K" (SPR_HID1));
222		__asm __volatile ("mfspr %0,%2; mr %1,%0; srdi %0,%0,32"
223		    : "=r" (bsp_state[4]),"=r" (bsp_state[5]) : "K" (SPR_HID4));
224		__asm __volatile ("mfspr %0,%2; mr %1,%0; srdi %0,%0,32"
225		    : "=r" (bsp_state[6]),"=r" (bsp_state[7]) : "K" (SPR_HID5));
226		#endif
227
228		powerpc_sync();
229
230		break;
231	case MPC7450:
232	case MPC7455:
233	case MPC7457:
234		/* Only MPC745x CPUs have an L3 cache. */
235		bsp_state[3] = mfspr(SPR_L3CR);
236
237		/* Fallthrough */
238	case MPC7400:
239	case MPC7410:
240	case MPC7447A:
241	case MPC7448:
242		bsp_state[2] = mfspr(SPR_L2CR);
243		bsp_state[1] = mfspr(SPR_HID1);
244		bsp_state[0] = mfspr(SPR_HID0);
245		break;
246	}
247}
248
249void
250cpudep_ap_setup()
251{
252	register_t	reg;
253	uint16_t	vers;
254
255	vers = mfpvr() >> 16;
256
257	switch(vers) {
258	case IBM970:
259	case IBM970FX:
260	case IBM970MP:
261		/* Set HIOR to 0 */
262		__asm __volatile("mtspr 311,%0" :: "r"(0));
263		powerpc_sync();
264
265		/*
266		 * The 970 has strange rules about how to update HID registers.
267		 * See Table 2-3, 970MP manual
268		 */
269
270		__asm __volatile("mtasr %0; sync" :: "r"(0));
271		__asm __volatile(" \
272			ld	%0,0(%2);				\
273			sync; isync;					\
274			mtspr	%1, %0;					\
275			mfspr	%0, %1;	mfspr	%0, %1;	mfspr	%0, %1;	\
276			mfspr	%0, %1;	mfspr	%0, %1;	mfspr	%0, %1; \
277			sync; isync"
278		    : "=r"(reg) : "K"(SPR_HID0), "r"(bsp_state));
279		__asm __volatile("ld %0, 8(%2); sync; isync;	\
280		    mtspr %1, %0; mtspr %1, %0; sync; isync"
281		    : "=r"(reg) : "K"(SPR_HID1), "r"(bsp_state));
282		__asm __volatile("ld %0, 16(%2); sync; isync;	\
283		    mtspr %1, %0; sync; isync;"
284		    : "=r"(reg) : "K"(SPR_HID4), "r"(bsp_state));
285		__asm __volatile("ld %0, 24(%2); sync; isync;	\
286		    mtspr %1, %0; sync; isync;"
287		    : "=r"(reg) : "K"(SPR_HID5), "r"(bsp_state));
288
289		powerpc_sync();
290		break;
291	case MPC7450:
292	case MPC7455:
293	case MPC7457:
294		/* Only MPC745x CPUs have an L3 cache. */
295		reg = mpc745x_l3_enable(bsp_state[3]);
296
297		/* Fallthrough */
298	case MPC7400:
299	case MPC7410:
300	case MPC7447A:
301	case MPC7448:
302		/* XXX: Program the CPU ID into PIR */
303		__asm __volatile("mtspr 1023,%0" :: "r"(PCPU_GET(cpuid)));
304
305		powerpc_sync();
306		isync();
307
308		mtspr(SPR_HID0, bsp_state[0]); isync();
309		mtspr(SPR_HID1, bsp_state[1]); isync();
310
311		reg = mpc74xx_l2_enable(bsp_state[2]);
312		reg = mpc74xx_l1d_enable();
313		reg = mpc74xx_l1i_enable();
314
315		break;
316	default:
317		printf("WARNING: Unknown CPU type. Cache performace may be "
318		    "suboptimal.\n");
319		break;
320	}
321}
322
323