xref: /rk3399_rockchip-uboot/arch/powerpc/cpu/mpc85xx/cpu_init.c (revision f2a37fcd9ba9d3d0aab5864141715596aff1de60)
1 /*
2  * Copyright 2007-2010 Freescale Semiconductor, Inc.
3  *
4  * (C) Copyright 2003 Motorola Inc.
5  * Modified by Xianghua Xiao, X.Xiao@motorola.com
6  *
7  * (C) Copyright 2000
8  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
9  *
10  * See file CREDITS for list of people who contributed to this
11  * project.
12  *
13  * This program is free software; you can redistribute it and/or
14  * modify it under the terms of the GNU General Public License as
15  * published by the Free Software Foundation; either version 2 of
16  * the License, or (at your option) any later version.
17  *
18  * This program is distributed in the hope that it will be useful,
19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21  * GNU General Public License for more details.
22  *
23  * You should have received a copy of the GNU General Public License
24  * along with this program; if not, write to the Free Software
25  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
26  * MA 02111-1307 USA
27  */
28 
29 #include <common.h>
30 #include <watchdog.h>
31 #include <asm/processor.h>
32 #include <ioports.h>
33 #include <sata.h>
34 #include <asm/io.h>
35 #include <asm/mmu.h>
36 #include <asm/fsl_law.h>
37 #include <asm/fsl_serdes.h>
38 #include "mp.h"
39 
40 DECLARE_GLOBAL_DATA_PTR;
41 
42 #ifdef CONFIG_QE
43 extern qe_iop_conf_t qe_iop_conf_tab[];
44 extern void qe_config_iopin(u8 port, u8 pin, int dir,
45 				int open_drain, int assign);
46 extern void qe_init(uint qe_base);
47 extern void qe_reset(void);
48 
49 static void config_qe_ioports(void)
50 {
51 	u8      port, pin;
52 	int     dir, open_drain, assign;
53 	int     i;
54 
55 	for (i = 0; qe_iop_conf_tab[i].assign != QE_IOP_TAB_END; i++) {
56 		port		= qe_iop_conf_tab[i].port;
57 		pin		= qe_iop_conf_tab[i].pin;
58 		dir		= qe_iop_conf_tab[i].dir;
59 		open_drain	= qe_iop_conf_tab[i].open_drain;
60 		assign		= qe_iop_conf_tab[i].assign;
61 		qe_config_iopin(port, pin, dir, open_drain, assign);
62 	}
63 }
64 #endif
65 
66 #ifdef CONFIG_CPM2
67 void config_8560_ioports (volatile ccsr_cpm_t * cpm)
68 {
69 	int portnum;
70 
71 	for (portnum = 0; portnum < 4; portnum++) {
72 		uint pmsk = 0,
73 		     ppar = 0,
74 		     psor = 0,
75 		     pdir = 0,
76 		     podr = 0,
77 		     pdat = 0;
78 		iop_conf_t *iopc = (iop_conf_t *) & iop_conf_tab[portnum][0];
79 		iop_conf_t *eiopc = iopc + 32;
80 		uint msk = 1;
81 
82 		/*
83 		 * NOTE:
84 		 * index 0 refers to pin 31,
85 		 * index 31 refers to pin 0
86 		 */
87 		while (iopc < eiopc) {
88 			if (iopc->conf) {
89 				pmsk |= msk;
90 				if (iopc->ppar)
91 					ppar |= msk;
92 				if (iopc->psor)
93 					psor |= msk;
94 				if (iopc->pdir)
95 					pdir |= msk;
96 				if (iopc->podr)
97 					podr |= msk;
98 				if (iopc->pdat)
99 					pdat |= msk;
100 			}
101 
102 			msk <<= 1;
103 			iopc++;
104 		}
105 
106 		if (pmsk != 0) {
107 			volatile ioport_t *iop = ioport_addr (cpm, portnum);
108 			uint tpmsk = ~pmsk;
109 
110 			/*
111 			 * the (somewhat confused) paragraph at the
112 			 * bottom of page 35-5 warns that there might
113 			 * be "unknown behaviour" when programming
114 			 * PSORx and PDIRx, if PPARx = 1, so I
115 			 * decided this meant I had to disable the
116 			 * dedicated function first, and enable it
117 			 * last.
118 			 */
119 			iop->ppar &= tpmsk;
120 			iop->psor = (iop->psor & tpmsk) | psor;
121 			iop->podr = (iop->podr & tpmsk) | podr;
122 			iop->pdat = (iop->pdat & tpmsk) | pdat;
123 			iop->pdir = (iop->pdir & tpmsk) | pdir;
124 			iop->ppar |= ppar;
125 		}
126 	}
127 }
128 #endif
129 
130 /*
131  * Breathe some life into the CPU...
132  *
133  * Set up the memory map
134  * initialize a bunch of registers
135  */
136 
137 #ifdef CONFIG_FSL_CORENET
138 static void corenet_tb_init(void)
139 {
140 	volatile ccsr_rcpm_t *rcpm =
141 		(void *)(CONFIG_SYS_FSL_CORENET_RCPM_ADDR);
142 	volatile ccsr_pic_t *pic =
143 		(void *)(CONFIG_SYS_MPC85xx_PIC_ADDR);
144 	u32 whoami = in_be32(&pic->whoami);
145 
146 	/* Enable the timebase register for this core */
147 	out_be32(&rcpm->ctbenrl, (1 << whoami));
148 }
149 #endif
150 
151 void cpu_init_f (void)
152 {
153 	extern void m8560_cpm_reset (void);
154 #ifdef CONFIG_MPC8548
155 	ccsr_local_ecm_t *ecm = (void *)(CONFIG_SYS_MPC85xx_ECM_ADDR);
156 	uint svr = get_svr();
157 
158 	/*
159 	 * CPU2 errata workaround: A core hang possible while executing
160 	 * a msync instruction and a snoopable transaction from an I/O
161 	 * master tagged to make quick forward progress is present.
162 	 * Fixed in silicon rev 2.1.
163 	 */
164 	if ((SVR_MAJ(svr) == 1) || ((SVR_MAJ(svr) == 2 && SVR_MIN(svr) == 0x0)))
165 		out_be32(&ecm->eebpcr, in_be32(&ecm->eebpcr) | (1 << 16));
166 #endif
167 
168 	disable_tlb(14);
169 	disable_tlb(15);
170 
171 #ifdef CONFIG_CPM2
172 	config_8560_ioports((ccsr_cpm_t *)CONFIG_SYS_MPC85xx_CPM_ADDR);
173 #endif
174 
175        init_early_memctl_regs();
176 
177 #if defined(CONFIG_CPM2)
178 	m8560_cpm_reset();
179 #endif
180 #ifdef CONFIG_QE
181 	/* Config QE ioports */
182 	config_qe_ioports();
183 #endif
184 #if defined(CONFIG_FSL_DMA)
185 	dma_init();
186 #endif
187 #ifdef CONFIG_FSL_CORENET
188 	corenet_tb_init();
189 #endif
190 	init_used_tlb_cams();
191 }
192 
193 
194 /*
195  * Initialize L2 as cache.
196  *
197  * The newer 8548, etc, parts have twice as much cache, but
198  * use the same bit-encoding as the older 8555, etc, parts.
199  *
200  */
201 
202 int cpu_init_r(void)
203 {
204 #ifdef CONFIG_SYS_LBC_LCRR
205 	volatile fsl_lbc_t *lbc = LBC_BASE_ADDR;
206 #endif
207 
208 	puts ("L2:    ");
209 
210 #if defined(CONFIG_L2_CACHE)
211 	volatile ccsr_l2cache_t *l2cache = (void *)CONFIG_SYS_MPC85xx_L2_ADDR;
212 	volatile uint cache_ctl;
213 	uint svr, ver;
214 	uint l2srbar;
215 	u32 l2siz_field;
216 
217 	svr = get_svr();
218 	ver = SVR_SOC_VER(svr);
219 
220 	asm("msync;isync");
221 	cache_ctl = l2cache->l2ctl;
222 
223 #if defined(CONFIG_SYS_RAMBOOT) && defined(CONFIG_SYS_INIT_L2_ADDR)
224 	if (cache_ctl & MPC85xx_L2CTL_L2E) {
225 		/* Clear L2 SRAM memory-mapped base address */
226 		out_be32(&l2cache->l2srbar0, 0x0);
227 		out_be32(&l2cache->l2srbar1, 0x0);
228 
229 		/* set MBECCDIS=0, SBECCDIS=0 */
230 		clrbits_be32(&l2cache->l2errdis,
231 				(MPC85xx_L2ERRDIS_MBECC |
232 				 MPC85xx_L2ERRDIS_SBECC));
233 
234 		/* set L2E=0, L2SRAM=0 */
235 		clrbits_be32(&l2cache->l2ctl,
236 				(MPC85xx_L2CTL_L2E |
237 				 MPC85xx_L2CTL_L2SRAM_ENTIRE));
238 	}
239 #endif
240 
241 	l2siz_field = (cache_ctl >> 28) & 0x3;
242 
243 	switch (l2siz_field) {
244 	case 0x0:
245 		printf(" unknown size (0x%08x)\n", cache_ctl);
246 		return -1;
247 		break;
248 	case 0x1:
249 		if (ver == SVR_8540 || ver == SVR_8560   ||
250 		    ver == SVR_8541 || ver == SVR_8541_E ||
251 		    ver == SVR_8555 || ver == SVR_8555_E) {
252 			puts("128 KB ");
253 			/* set L2E=1, L2I=1, & L2BLKSZ=1 (128 Kbyte) */
254 			cache_ctl = 0xc4000000;
255 		} else {
256 			puts("256 KB ");
257 			cache_ctl = 0xc0000000; /* set L2E=1, L2I=1, & L2SRAM=0 */
258 		}
259 		break;
260 	case 0x2:
261 		if (ver == SVR_8540 || ver == SVR_8560   ||
262 		    ver == SVR_8541 || ver == SVR_8541_E ||
263 		    ver == SVR_8555 || ver == SVR_8555_E) {
264 			puts("256 KB ");
265 			/* set L2E=1, L2I=1, & L2BLKSZ=2 (256 Kbyte) */
266 			cache_ctl = 0xc8000000;
267 		} else {
268 			puts ("512 KB ");
269 			/* set L2E=1, L2I=1, & L2SRAM=0 */
270 			cache_ctl = 0xc0000000;
271 		}
272 		break;
273 	case 0x3:
274 		puts("1024 KB ");
275 		/* set L2E=1, L2I=1, & L2SRAM=0 */
276 		cache_ctl = 0xc0000000;
277 		break;
278 	}
279 
280 	if (l2cache->l2ctl & MPC85xx_L2CTL_L2E) {
281 		puts("already enabled");
282 		l2srbar = l2cache->l2srbar0;
283 #ifdef CONFIG_SYS_INIT_L2_ADDR
284 		if (l2cache->l2ctl & MPC85xx_L2CTL_L2SRAM_ENTIRE
285 				&& l2srbar >= CONFIG_SYS_FLASH_BASE) {
286 			l2srbar = CONFIG_SYS_INIT_L2_ADDR;
287 			l2cache->l2srbar0 = l2srbar;
288 			printf("moving to 0x%08x", CONFIG_SYS_INIT_L2_ADDR);
289 		}
290 #endif /* CONFIG_SYS_INIT_L2_ADDR */
291 		puts("\n");
292 	} else {
293 		asm("msync;isync");
294 		l2cache->l2ctl = cache_ctl; /* invalidate & enable */
295 		asm("msync;isync");
296 		puts("enabled\n");
297 	}
298 #elif defined(CONFIG_BACKSIDE_L2_CACHE)
299 	u32 l2cfg0 = mfspr(SPRN_L2CFG0);
300 
301 	/* invalidate the L2 cache */
302 	mtspr(SPRN_L2CSR0, (L2CSR0_L2FI|L2CSR0_L2LFC));
303 	while (mfspr(SPRN_L2CSR0) & (L2CSR0_L2FI|L2CSR0_L2LFC))
304 		;
305 
306 #ifdef CONFIG_SYS_CACHE_STASHING
307 	/* set stash id to (coreID) * 2 + 32 + L2 (1) */
308 	mtspr(SPRN_L2CSR1, (32 + 1));
309 #endif
310 
311 	/* enable the cache */
312 	mtspr(SPRN_L2CSR0, CONFIG_SYS_INIT_L2CSR0);
313 
314 	if (CONFIG_SYS_INIT_L2CSR0 & L2CSR0_L2E) {
315 		while (!(mfspr(SPRN_L2CSR0) & L2CSR0_L2E))
316 			;
317 		printf("%d KB enabled\n", (l2cfg0 & 0x3fff) * 64);
318 	}
319 #else
320 	puts("disabled\n");
321 #endif
322 #ifdef CONFIG_QE
323 	uint qe_base = CONFIG_SYS_IMMR + 0x00080000; /* QE immr base */
324 	qe_init(qe_base);
325 	qe_reset();
326 #endif
327 
328 #if defined(CONFIG_SYS_HAS_SERDES)
329 	/* needs to be in ram since code uses global static vars */
330 	fsl_serdes_init();
331 #endif
332 
333 #if defined(CONFIG_MP)
334 	setup_mp();
335 #endif
336 
337 #ifdef CONFIG_SYS_LBC_LCRR
338 	/*
339 	 * Modify the CLKDIV field of LCRR register to improve the writing
340 	 * speed for NOR flash.
341 	 */
342 	clrsetbits_be32(&lbc->lcrr, LCRR_CLKDIV, CONFIG_SYS_LBC_LCRR);
343 	__raw_readl(&lbc->lcrr);
344 	isync();
345 #endif
346 
347 	return 0;
348 }
349 
350 extern void setup_ivors(void);
351 
352 void arch_preboot_os(void)
353 {
354 	u32 msr;
355 
356 	/*
357 	 * We are changing interrupt offsets and are about to boot the OS so
358 	 * we need to make sure we disable all async interrupts. EE is already
359 	 * disabled by the time we get called.
360 	 */
361 	msr = mfmsr();
362 	msr &= ~(MSR_ME|MSR_CE|MSR_DE);
363 	mtmsr(msr);
364 
365 	setup_ivors();
366 }
367 
368 #if defined(CONFIG_CMD_SATA) && defined(CONFIG_FSL_SATA)
369 int sata_initialize(void)
370 {
371 	if (is_serdes_configured(SATA1) || is_serdes_configured(SATA2))
372 		return __sata_initialize();
373 
374 	return 1;
375 }
376 #endif
377