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/cache.h> 36 #include <asm/mmu.h> 37 #include <asm/fsl_law.h> 38 #include <asm/fsl_serdes.h> 39 #include "mp.h" 40 41 DECLARE_GLOBAL_DATA_PTR; 42 43 #ifdef CONFIG_QE 44 extern qe_iop_conf_t qe_iop_conf_tab[]; 45 extern void qe_config_iopin(u8 port, u8 pin, int dir, 46 int open_drain, int assign); 47 extern void qe_init(uint qe_base); 48 extern void qe_reset(void); 49 50 static void config_qe_ioports(void) 51 { 52 u8 port, pin; 53 int dir, open_drain, assign; 54 int i; 55 56 for (i = 0; qe_iop_conf_tab[i].assign != QE_IOP_TAB_END; i++) { 57 port = qe_iop_conf_tab[i].port; 58 pin = qe_iop_conf_tab[i].pin; 59 dir = qe_iop_conf_tab[i].dir; 60 open_drain = qe_iop_conf_tab[i].open_drain; 61 assign = qe_iop_conf_tab[i].assign; 62 qe_config_iopin(port, pin, dir, open_drain, assign); 63 } 64 } 65 #endif 66 67 #ifdef CONFIG_CPM2 68 void config_8560_ioports (volatile ccsr_cpm_t * cpm) 69 { 70 int portnum; 71 72 for (portnum = 0; portnum < 4; portnum++) { 73 uint pmsk = 0, 74 ppar = 0, 75 psor = 0, 76 pdir = 0, 77 podr = 0, 78 pdat = 0; 79 iop_conf_t *iopc = (iop_conf_t *) & iop_conf_tab[portnum][0]; 80 iop_conf_t *eiopc = iopc + 32; 81 uint msk = 1; 82 83 /* 84 * NOTE: 85 * index 0 refers to pin 31, 86 * index 31 refers to pin 0 87 */ 88 while (iopc < eiopc) { 89 if (iopc->conf) { 90 pmsk |= msk; 91 if (iopc->ppar) 92 ppar |= msk; 93 if (iopc->psor) 94 psor |= msk; 95 if (iopc->pdir) 96 pdir |= msk; 97 if (iopc->podr) 98 podr |= msk; 99 if (iopc->pdat) 100 pdat |= msk; 101 } 102 103 msk <<= 1; 104 iopc++; 105 } 106 107 if (pmsk != 0) { 108 volatile ioport_t *iop = ioport_addr (cpm, portnum); 109 uint tpmsk = ~pmsk; 110 111 /* 112 * the (somewhat confused) paragraph at the 113 * bottom of page 35-5 warns that there might 114 * be "unknown behaviour" when programming 115 * PSORx and PDIRx, if PPARx = 1, so I 116 * decided this meant I had to disable the 117 * dedicated function first, and enable it 118 * last. 119 */ 120 iop->ppar &= tpmsk; 121 iop->psor = (iop->psor & tpmsk) | psor; 122 iop->podr = (iop->podr & tpmsk) | podr; 123 iop->pdat = (iop->pdat & tpmsk) | pdat; 124 iop->pdir = (iop->pdir & tpmsk) | pdir; 125 iop->ppar |= ppar; 126 } 127 } 128 } 129 #endif 130 131 #ifdef CONFIG_SYS_FSL_CPC 132 static void enable_cpc(void) 133 { 134 int i; 135 u32 size = 0; 136 137 cpc_corenet_t *cpc = (cpc_corenet_t *)CONFIG_SYS_FSL_CPC_ADDR; 138 139 for (i = 0; i < CONFIG_SYS_NUM_CPC; i++, cpc++) { 140 u32 cpccfg0 = in_be32(&cpc->cpccfg0); 141 size += CPC_CFG0_SZ_K(cpccfg0); 142 143 out_be32(&cpc->cpccsr0, CPC_CSR0_CE | CPC_CSR0_PE); 144 /* Read back to sync write */ 145 in_be32(&cpc->cpccsr0); 146 147 } 148 149 printf("Corenet Platform Cache: %d KB enabled\n", size); 150 } 151 152 void invalidate_cpc(void) 153 { 154 int i; 155 cpc_corenet_t *cpc = (cpc_corenet_t *)CONFIG_SYS_FSL_CPC_ADDR; 156 157 for (i = 0; i < CONFIG_SYS_NUM_CPC; i++, cpc++) { 158 /* Flash invalidate the CPC and clear all the locks */ 159 out_be32(&cpc->cpccsr0, CPC_CSR0_FI | CPC_CSR0_LFC); 160 while (in_be32(&cpc->cpccsr0) & (CPC_CSR0_FI | CPC_CSR0_LFC)) 161 ; 162 } 163 } 164 #else 165 #define enable_cpc() 166 #define invalidate_cpc() 167 #endif /* CONFIG_SYS_FSL_CPC */ 168 169 /* 170 * Breathe some life into the CPU... 171 * 172 * Set up the memory map 173 * initialize a bunch of registers 174 */ 175 176 #ifdef CONFIG_FSL_CORENET 177 static void corenet_tb_init(void) 178 { 179 volatile ccsr_rcpm_t *rcpm = 180 (void *)(CONFIG_SYS_FSL_CORENET_RCPM_ADDR); 181 volatile ccsr_pic_t *pic = 182 (void *)(CONFIG_SYS_MPC8xxx_PIC_ADDR); 183 u32 whoami = in_be32(&pic->whoami); 184 185 /* Enable the timebase register for this core */ 186 out_be32(&rcpm->ctbenrl, (1 << whoami)); 187 } 188 #endif 189 190 void cpu_init_f (void) 191 { 192 extern void m8560_cpm_reset (void); 193 #ifdef CONFIG_MPC8548 194 ccsr_local_ecm_t *ecm = (void *)(CONFIG_SYS_MPC85xx_ECM_ADDR); 195 uint svr = get_svr(); 196 197 /* 198 * CPU2 errata workaround: A core hang possible while executing 199 * a msync instruction and a snoopable transaction from an I/O 200 * master tagged to make quick forward progress is present. 201 * Fixed in silicon rev 2.1. 202 */ 203 if ((SVR_MAJ(svr) == 1) || ((SVR_MAJ(svr) == 2 && SVR_MIN(svr) == 0x0))) 204 out_be32(&ecm->eebpcr, in_be32(&ecm->eebpcr) | (1 << 16)); 205 #endif 206 207 disable_tlb(14); 208 disable_tlb(15); 209 210 #ifdef CONFIG_CPM2 211 config_8560_ioports((ccsr_cpm_t *)CONFIG_SYS_MPC85xx_CPM_ADDR); 212 #endif 213 214 init_early_memctl_regs(); 215 216 #if defined(CONFIG_CPM2) 217 m8560_cpm_reset(); 218 #endif 219 #ifdef CONFIG_QE 220 /* Config QE ioports */ 221 config_qe_ioports(); 222 #endif 223 #if defined(CONFIG_FSL_DMA) 224 dma_init(); 225 #endif 226 #ifdef CONFIG_FSL_CORENET 227 corenet_tb_init(); 228 #endif 229 init_used_tlb_cams(); 230 231 /* Invalidate the CPC before DDR gets enabled */ 232 invalidate_cpc(); 233 } 234 235 /* Implement a dummy function for those platforms w/o SERDES */ 236 static void __fsl_serdes__init(void) 237 { 238 return ; 239 } 240 __attribute__((weak, alias("__fsl_serdes__init"))) void fsl_serdes_init(void); 241 242 /* 243 * Initialize L2 as cache. 244 * 245 * The newer 8548, etc, parts have twice as much cache, but 246 * use the same bit-encoding as the older 8555, etc, parts. 247 * 248 */ 249 int cpu_init_r(void) 250 { 251 #ifdef CONFIG_SYS_LBC_LCRR 252 volatile fsl_lbc_t *lbc = LBC_BASE_ADDR; 253 #endif 254 255 #if defined(CONFIG_SYS_P4080_ERRATUM_CPU22) 256 flush_dcache(); 257 mtspr(L1CSR2, (mfspr(L1CSR2) | L1CSR2_DCWS)); 258 sync(); 259 #endif 260 261 puts ("L2: "); 262 263 #if defined(CONFIG_L2_CACHE) 264 volatile ccsr_l2cache_t *l2cache = (void *)CONFIG_SYS_MPC85xx_L2_ADDR; 265 volatile uint cache_ctl; 266 uint svr, ver; 267 uint l2srbar; 268 u32 l2siz_field; 269 270 svr = get_svr(); 271 ver = SVR_SOC_VER(svr); 272 273 asm("msync;isync"); 274 cache_ctl = l2cache->l2ctl; 275 276 #if defined(CONFIG_SYS_RAMBOOT) && defined(CONFIG_SYS_INIT_L2_ADDR) 277 if (cache_ctl & MPC85xx_L2CTL_L2E) { 278 /* Clear L2 SRAM memory-mapped base address */ 279 out_be32(&l2cache->l2srbar0, 0x0); 280 out_be32(&l2cache->l2srbar1, 0x0); 281 282 /* set MBECCDIS=0, SBECCDIS=0 */ 283 clrbits_be32(&l2cache->l2errdis, 284 (MPC85xx_L2ERRDIS_MBECC | 285 MPC85xx_L2ERRDIS_SBECC)); 286 287 /* set L2E=0, L2SRAM=0 */ 288 clrbits_be32(&l2cache->l2ctl, 289 (MPC85xx_L2CTL_L2E | 290 MPC85xx_L2CTL_L2SRAM_ENTIRE)); 291 } 292 #endif 293 294 l2siz_field = (cache_ctl >> 28) & 0x3; 295 296 switch (l2siz_field) { 297 case 0x0: 298 printf(" unknown size (0x%08x)\n", cache_ctl); 299 return -1; 300 break; 301 case 0x1: 302 if (ver == SVR_8540 || ver == SVR_8560 || 303 ver == SVR_8541 || ver == SVR_8541_E || 304 ver == SVR_8555 || ver == SVR_8555_E) { 305 puts("128 KB "); 306 /* set L2E=1, L2I=1, & L2BLKSZ=1 (128 Kbyte) */ 307 cache_ctl = 0xc4000000; 308 } else { 309 puts("256 KB "); 310 cache_ctl = 0xc0000000; /* set L2E=1, L2I=1, & L2SRAM=0 */ 311 } 312 break; 313 case 0x2: 314 if (ver == SVR_8540 || ver == SVR_8560 || 315 ver == SVR_8541 || ver == SVR_8541_E || 316 ver == SVR_8555 || ver == SVR_8555_E) { 317 puts("256 KB "); 318 /* set L2E=1, L2I=1, & L2BLKSZ=2 (256 Kbyte) */ 319 cache_ctl = 0xc8000000; 320 } else { 321 puts ("512 KB "); 322 /* set L2E=1, L2I=1, & L2SRAM=0 */ 323 cache_ctl = 0xc0000000; 324 } 325 break; 326 case 0x3: 327 puts("1024 KB "); 328 /* set L2E=1, L2I=1, & L2SRAM=0 */ 329 cache_ctl = 0xc0000000; 330 break; 331 } 332 333 if (l2cache->l2ctl & MPC85xx_L2CTL_L2E) { 334 puts("already enabled"); 335 l2srbar = l2cache->l2srbar0; 336 #if defined(CONFIG_SYS_INIT_L2_ADDR) && defined(CONFIG_SYS_FLASH_BASE) 337 if (l2cache->l2ctl & MPC85xx_L2CTL_L2SRAM_ENTIRE 338 && l2srbar >= CONFIG_SYS_FLASH_BASE) { 339 l2srbar = CONFIG_SYS_INIT_L2_ADDR; 340 l2cache->l2srbar0 = l2srbar; 341 printf("moving to 0x%08x", CONFIG_SYS_INIT_L2_ADDR); 342 } 343 #endif /* CONFIG_SYS_INIT_L2_ADDR */ 344 puts("\n"); 345 } else { 346 asm("msync;isync"); 347 l2cache->l2ctl = cache_ctl; /* invalidate & enable */ 348 asm("msync;isync"); 349 puts("enabled\n"); 350 } 351 #elif defined(CONFIG_BACKSIDE_L2_CACHE) 352 u32 l2cfg0 = mfspr(SPRN_L2CFG0); 353 354 /* invalidate the L2 cache */ 355 mtspr(SPRN_L2CSR0, (L2CSR0_L2FI|L2CSR0_L2LFC)); 356 while (mfspr(SPRN_L2CSR0) & (L2CSR0_L2FI|L2CSR0_L2LFC)) 357 ; 358 359 #ifdef CONFIG_SYS_CACHE_STASHING 360 /* set stash id to (coreID) * 2 + 32 + L2 (1) */ 361 mtspr(SPRN_L2CSR1, (32 + 1)); 362 #endif 363 364 /* enable the cache */ 365 mtspr(SPRN_L2CSR0, CONFIG_SYS_INIT_L2CSR0); 366 367 if (CONFIG_SYS_INIT_L2CSR0 & L2CSR0_L2E) { 368 while (!(mfspr(SPRN_L2CSR0) & L2CSR0_L2E)) 369 ; 370 printf("%d KB enabled\n", (l2cfg0 & 0x3fff) * 64); 371 } 372 #else 373 puts("disabled\n"); 374 #endif 375 376 enable_cpc(); 377 378 #ifdef CONFIG_QE 379 uint qe_base = CONFIG_SYS_IMMR + 0x00080000; /* QE immr base */ 380 qe_init(qe_base); 381 qe_reset(); 382 #endif 383 384 /* needs to be in ram since code uses global static vars */ 385 fsl_serdes_init(); 386 387 #if defined(CONFIG_MP) 388 setup_mp(); 389 #endif 390 391 #ifdef CONFIG_SYS_LBC_LCRR 392 /* 393 * Modify the CLKDIV field of LCRR register to improve the writing 394 * speed for NOR flash. 395 */ 396 clrsetbits_be32(&lbc->lcrr, LCRR_CLKDIV, CONFIG_SYS_LBC_LCRR); 397 __raw_readl(&lbc->lcrr); 398 isync(); 399 #endif 400 401 return 0; 402 } 403 404 extern void setup_ivors(void); 405 406 void arch_preboot_os(void) 407 { 408 u32 msr; 409 410 /* 411 * We are changing interrupt offsets and are about to boot the OS so 412 * we need to make sure we disable all async interrupts. EE is already 413 * disabled by the time we get called. 414 */ 415 msr = mfmsr(); 416 msr &= ~(MSR_ME|MSR_CE|MSR_DE); 417 mtmsr(msr); 418 419 setup_ivors(); 420 } 421 422 #if defined(CONFIG_CMD_SATA) && defined(CONFIG_FSL_SATA) 423 int sata_initialize(void) 424 { 425 if (is_serdes_configured(SATA1) || is_serdes_configured(SATA2)) 426 return __sata_initialize(); 427 428 return 1; 429 } 430 #endif 431