1 /* 2 * (C) Copyright 2008 3 * Sergei Poselenov, Emcraft Systems, sposelenov@emcraft.com. 4 * 5 * Copyright 2004 Freescale Semiconductor. 6 * (C) Copyright 2002,2003, Motorola Inc. 7 * Xianghua Xiao, (X.Xiao@motorola.com) 8 * 9 * (C) Copyright 2002 Scott McNutt <smcnutt@artesyncp.com> 10 * 11 * See file CREDITS for list of people who contributed to this 12 * project. 13 * 14 * This program is free software; you can redistribute it and/or 15 * modify it under the terms of the GNU General Public License as 16 * published by the Free Software Foundation; either version 2 of 17 * the License, or (at your option) any later version. 18 * 19 * This program is distributed in the hope that it will be useful, 20 * but WITHOUT ANY WARRANTY; without even the implied warranty of 21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 22 * GNU General Public License for more details. 23 * 24 * You should have received a copy of the GNU General Public License 25 * along with this program; if not, write to the Free Software 26 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, 27 * MA 02111-1307 USA 28 */ 29 30 #include <common.h> 31 #include <pci.h> 32 #include <asm/processor.h> 33 #include <asm/immap_85xx.h> 34 #include <ioports.h> 35 #include <flash.h> 36 #include <libfdt.h> 37 #include <fdt_support.h> 38 #include <asm/io.h> 39 #include <i2c.h> 40 #include <mb862xx.h> 41 #include <video_fb.h> 42 #include "upm_table.h" 43 44 DECLARE_GLOBAL_DATA_PTR; 45 46 extern flash_info_t flash_info[]; /* FLASH chips info */ 47 extern GraphicDevice mb862xx; 48 49 void local_bus_init (void); 50 ulong flash_get_size (ulong base, int banknum); 51 52 int checkboard (void) 53 { 54 volatile ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR); 55 56 char *src; 57 int f; 58 char *s = getenv("serial#"); 59 60 puts("Board: Socrates"); 61 if (s != NULL) { 62 puts(", serial# "); 63 puts(s); 64 } 65 putc('\n'); 66 67 #ifdef CONFIG_PCI 68 /* Check the PCI_clk sel bit */ 69 if (in_be32(&gur->porpllsr) & (1<<15)) { 70 src = "SYSCLK"; 71 f = CONFIG_SYS_CLK_FREQ; 72 } else { 73 src = "PCI_CLK"; 74 f = CONFIG_PCI_CLK_FREQ; 75 } 76 printf ("PCI1: 32 bit, %d MHz (%s)\n", f/1000000, src); 77 #else 78 printf ("PCI1: disabled\n"); 79 #endif 80 81 /* 82 * Initialize local bus. 83 */ 84 local_bus_init (); 85 return 0; 86 } 87 88 int misc_init_r (void) 89 { 90 volatile ccsr_lbc_t *memctl = (void *)(CONFIG_SYS_MPC85xx_LBC_ADDR); 91 92 /* 93 * Adjust flash start and offset to detected values 94 */ 95 gd->bd->bi_flashstart = 0 - gd->bd->bi_flashsize; 96 gd->bd->bi_flashoffset = 0; 97 98 /* 99 * Check if boot FLASH isn't max size 100 */ 101 if (gd->bd->bi_flashsize < (0 - CONFIG_SYS_FLASH0)) { 102 memctl->or0 = gd->bd->bi_flashstart | (CONFIG_SYS_OR0_PRELIM & 0x00007fff); 103 memctl->br0 = gd->bd->bi_flashstart | (CONFIG_SYS_BR0_PRELIM & 0x00007fff); 104 105 /* 106 * Re-check to get correct base address 107 */ 108 flash_get_size(gd->bd->bi_flashstart, CONFIG_SYS_MAX_FLASH_BANKS - 1); 109 } 110 111 /* 112 * Check if only one FLASH bank is available 113 */ 114 if (gd->bd->bi_flashsize != CONFIG_SYS_MAX_FLASH_BANKS * (0 - CONFIG_SYS_FLASH0)) { 115 memctl->or1 = 0; 116 memctl->br1 = 0; 117 118 /* 119 * Re-do flash protection upon new addresses 120 */ 121 flash_protect (FLAG_PROTECT_CLEAR, 122 gd->bd->bi_flashstart, 0xffffffff, 123 &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]); 124 125 /* Monitor protection ON by default */ 126 flash_protect (FLAG_PROTECT_SET, 127 CONFIG_SYS_MONITOR_BASE, CONFIG_SYS_MONITOR_BASE + monitor_flash_len - 1, 128 &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]); 129 130 /* Environment protection ON by default */ 131 flash_protect (FLAG_PROTECT_SET, 132 CONFIG_ENV_ADDR, 133 CONFIG_ENV_ADDR + CONFIG_ENV_SECT_SIZE - 1, 134 &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]); 135 136 /* Redundant environment protection ON by default */ 137 flash_protect (FLAG_PROTECT_SET, 138 CONFIG_ENV_ADDR_REDUND, 139 CONFIG_ENV_ADDR_REDUND + CONFIG_ENV_SIZE_REDUND - 1, 140 &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]); 141 } 142 143 return 0; 144 } 145 146 /* 147 * Initialize Local Bus 148 */ 149 void local_bus_init (void) 150 { 151 volatile ccsr_lbc_t *lbc = (void *)(CONFIG_SYS_MPC85xx_LBC_ADDR); 152 volatile ccsr_local_ecm_t *ecm = (void *)(CONFIG_SYS_MPC85xx_ECM_ADDR); 153 sys_info_t sysinfo; 154 uint clkdiv; 155 uint lbc_mhz; 156 uint lcrr = CONFIG_SYS_LBC_LCRR; 157 158 get_sys_info (&sysinfo); 159 clkdiv = lbc->lcrr & LCRR_CLKDIV; 160 lbc_mhz = sysinfo.freqSystemBus / 1000000 / clkdiv; 161 162 /* Disable PLL bypass for Local Bus Clock >= 66 MHz */ 163 if (lbc_mhz >= 66) 164 lcrr &= ~LCRR_DBYP; /* DLL Enabled */ 165 else 166 lcrr |= LCRR_DBYP; /* DLL Bypass */ 167 168 out_be32 (&lbc->lcrr, lcrr); 169 asm ("sync;isync;msync"); 170 171 out_be32 (&lbc->ltesr, 0xffffffff); /* Clear LBC error interrupts */ 172 out_be32 (&lbc->lteir, 0xffffffff); /* Enable LBC error interrupts */ 173 out_be32 (&ecm->eedr, 0xffffffff); /* Clear ecm errors */ 174 out_be32 (&ecm->eeer, 0xffffffff); /* Enable ecm errors */ 175 176 /* Init UPMA for FPGA access */ 177 out_be32 (&lbc->mamr, 0x44440); /* Use a customer-supplied value */ 178 upmconfig (UPMA, (uint *)UPMTableA, sizeof(UPMTableA)/sizeof(int)); 179 180 /* Init UPMB for Lime controller access */ 181 out_be32 (&lbc->mbmr, 0x444440); /* Use a customer-supplied value */ 182 upmconfig (UPMB, (uint *)UPMTableB, sizeof(UPMTableB)/sizeof(int)); 183 } 184 185 #if defined(CONFIG_PCI) 186 /* 187 * Initialize PCI Devices, report devices found. 188 */ 189 190 #ifndef CONFIG_PCI_PNP 191 static struct pci_config_table pci_mpc85xxads_config_table[] = { 192 {PCI_ANY_ID, PCI_ANY_ID, PCI_ANY_ID, PCI_ANY_ID, 193 PCI_IDSEL_NUMBER, PCI_ANY_ID, 194 pci_cfgfunc_config_device, {PCI_ENET0_IOADDR, 195 PCI_ENET0_MEMADDR, 196 PCI_COMMAND_MEMORY | 197 PCI_COMMAND_MASTER}}, 198 {} 199 }; 200 #endif 201 202 203 static struct pci_controller hose = { 204 #ifndef CONFIG_PCI_PNP 205 config_table:pci_mpc85xxads_config_table, 206 #endif 207 }; 208 209 #endif /* CONFIG_PCI */ 210 211 212 void pci_init_board (void) 213 { 214 #ifdef CONFIG_PCI 215 pci_mpc85xx_init (&hose); 216 #endif /* CONFIG_PCI */ 217 } 218 219 #ifdef CONFIG_BOARD_EARLY_INIT_R 220 int board_early_init_r (void) 221 { 222 volatile ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR); 223 224 /* set and reset the GPIO pin 2 which will reset the W83782G chip */ 225 out_8((unsigned char*)&gur->gpoutdr, 0x3F ); 226 out_be32((unsigned int*)&gur->gpiocr, 0x200 ); /* enable GPOut */ 227 udelay(200); 228 out_8( (unsigned char*)&gur->gpoutdr, 0x1F ); 229 230 return (0); 231 } 232 #endif /* CONFIG_BOARD_EARLY_INIT_R */ 233 234 #if defined(CONFIG_OF_LIBFDT) && defined(CONFIG_OF_BOARD_SETUP) 235 void 236 ft_board_setup(void *blob, bd_t *bd) 237 { 238 u32 val[12]; 239 int rc, i = 0; 240 241 ft_cpu_setup(blob, bd); 242 243 /* Fixup NOR FLASH mapping */ 244 val[i++] = 0; /* chip select number */ 245 val[i++] = 0; /* always 0 */ 246 val[i++] = gd->bd->bi_flashstart; 247 val[i++] = gd->bd->bi_flashsize; 248 249 if (mb862xx.frameAdrs == CONFIG_SYS_LIME_BASE) { 250 /* Fixup LIME mapping */ 251 val[i++] = 2; /* chip select number */ 252 val[i++] = 0; /* always 0 */ 253 val[i++] = CONFIG_SYS_LIME_BASE; 254 val[i++] = CONFIG_SYS_LIME_SIZE; 255 } 256 257 /* Fixup FPGA mapping */ 258 val[i++] = 3; /* chip select number */ 259 val[i++] = 0; /* always 0 */ 260 val[i++] = CONFIG_SYS_FPGA_BASE; 261 val[i++] = CONFIG_SYS_FPGA_SIZE; 262 263 rc = fdt_find_and_setprop(blob, "/localbus", "ranges", 264 val, i * sizeof(u32), 1); 265 if (rc) 266 printf("Unable to update localbus ranges, err=%s\n", 267 fdt_strerror(rc)); 268 } 269 #endif /* defined(CONFIG_OF_LIBFDT) && defined(CONFIG_OF_BOARD_SETUP) */ 270 271 #define CONFIG_SYS_LIME_SRST ((CONFIG_SYS_LIME_BASE) + 0x01FC002C) 272 #define CONFIG_SYS_LIME_CCF ((CONFIG_SYS_LIME_BASE) + 0x01FC0038) 273 #define CONFIG_SYS_LIME_MMR ((CONFIG_SYS_LIME_BASE) + 0x01FCFFFC) 274 /* Lime clock frequency */ 275 #define CONFIG_SYS_LIME_CLK_100MHZ 0x00000 276 #define CONFIG_SYS_LIME_CLK_133MHZ 0x10000 277 /* SDRAM parameter */ 278 #define CONFIG_SYS_LIME_MMR_VALUE 0x4157BA63 279 280 #define DISPLAY_WIDTH 800 281 #define DISPLAY_HEIGHT 480 282 #define DEFAULT_BRIGHTNESS 25 283 #define BACKLIGHT_ENABLE (1 << 31) 284 285 static const gdc_regs init_regs [] = 286 { 287 {0x0100, 0x00010f00}, 288 {0x0020, 0x801901df}, 289 {0x0024, 0x00000000}, 290 {0x0028, 0x00000000}, 291 {0x002c, 0x00000000}, 292 {0x0110, 0x00000000}, 293 {0x0114, 0x00000000}, 294 {0x0118, 0x01df0320}, 295 {0x0004, 0x041f0000}, 296 {0x0008, 0x031f031f}, 297 {0x000c, 0x017f0349}, 298 {0x0010, 0x020c0000}, 299 {0x0014, 0x01df01e9}, 300 {0x0018, 0x00000000}, 301 {0x001c, 0x01e00320}, 302 {0x0100, 0x80010f00}, 303 {0x0, 0x0} 304 }; 305 306 const gdc_regs *board_get_regs (void) 307 { 308 return init_regs; 309 } 310 311 #define CONFIG_SYS_LIME_CID ((CONFIG_SYS_LIME_BASE) + 0x01FC00F0) 312 #define CONFIG_SYS_LIME_REV ((CONFIG_SYS_LIME_BASE) + 0x01FF8084) 313 int lime_probe(void) 314 { 315 volatile ccsr_lbc_t *memctl = (void *)(CONFIG_SYS_MPC85xx_LBC_ADDR); 316 uint cfg_br2; 317 uint cfg_or2; 318 uint reg; 319 320 cfg_br2 = memctl->br2; 321 cfg_or2 = memctl->or2; 322 323 /* Configure GPCM for CS2 */ 324 memctl->br2 = 0; 325 memctl->or2 = 0xfc000410; 326 memctl->br2 = (CONFIG_SYS_LIME_BASE) | 0x00001901; 327 328 /* Try to access GDC ID/Revision registers */ 329 reg = in_be32((void *)CONFIG_SYS_LIME_CID); 330 reg = in_be32((void *)CONFIG_SYS_LIME_CID); 331 if (reg == 0x303) { 332 reg = in_be32((void *)CONFIG_SYS_LIME_REV); 333 reg = in_be32((void *)CONFIG_SYS_LIME_REV); 334 reg = ((reg & ~0xff) == 0x20050100) ? 1 : 0; 335 } else 336 reg = 0; 337 338 /* Restore previous CS2 configuration */ 339 memctl->br2 = 0; 340 memctl->or2 = cfg_or2; 341 memctl->br2 = cfg_br2; 342 return reg; 343 } 344 345 /* Returns Lime base address */ 346 unsigned int board_video_init (void) 347 { 348 if (!lime_probe()) 349 return 0; 350 351 /* 352 * Reset Lime controller 353 */ 354 out_be32((void *)CONFIG_SYS_LIME_SRST, 0x1); 355 udelay(200); 356 357 /* Set Lime clock to 133MHz */ 358 out_be32((void *)CONFIG_SYS_LIME_CCF, CONFIG_SYS_LIME_CLK_133MHZ); 359 /* Delay required */ 360 udelay(300); 361 /* Set memory parameters */ 362 out_be32((void *)CONFIG_SYS_LIME_MMR, CONFIG_SYS_LIME_MMR_VALUE); 363 364 mb862xx.winSizeX = DISPLAY_WIDTH; 365 mb862xx.winSizeY = DISPLAY_HEIGHT; 366 mb862xx.gdfIndex = GDF_15BIT_555RGB; 367 mb862xx.gdfBytesPP = 2; 368 369 return CONFIG_SYS_LIME_BASE; 370 } 371 372 #define W83782D_REG_CFG 0x40 373 #define W83782D_REG_BANK_SEL 0x4e 374 #define W83782D_REG_ADCCLK 0x4b 375 #define W83782D_REG_BEEP_CTRL 0x4d 376 #define W83782D_REG_BEEP_CTRL2 0x57 377 #define W83782D_REG_PWMOUT1 0x5b 378 #define W83782D_REG_VBAT 0x5d 379 380 static int w83782d_hwmon_init(void) 381 { 382 u8 buf; 383 384 if (i2c_read(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_CFG, 1, &buf, 1)) 385 return -1; 386 387 i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_CFG, 0x80); 388 i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_BANK_SEL, 0); 389 i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_ADCCLK, 0x40); 390 391 buf = i2c_reg_read(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_BEEP_CTRL); 392 i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_BEEP_CTRL, 393 buf | 0x80); 394 i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_BEEP_CTRL2, 0); 395 i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_PWMOUT1, 0x47); 396 i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_VBAT, 0x01); 397 398 buf = i2c_reg_read(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_CFG); 399 i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_CFG, 400 (buf & 0xf4) | 0x01); 401 return 0; 402 } 403 404 static void board_backlight_brightness(int br) 405 { 406 u32 reg; 407 u8 buf; 408 u8 old_buf; 409 410 /* Select bank 0 */ 411 if (i2c_read(CONFIG_SYS_I2C_W83782G_ADDR, 0x4e, 1, &old_buf, 1)) 412 goto err; 413 else 414 buf = old_buf & 0xf8; 415 416 if (i2c_write(CONFIG_SYS_I2C_W83782G_ADDR, 0x4e, 1, &buf, 1)) 417 goto err; 418 419 if (br > 0) { 420 /* PWMOUT1 duty cycle ctrl */ 421 buf = 255 / (100 / br); 422 if (i2c_write(CONFIG_SYS_I2C_W83782G_ADDR, 0x5b, 1, &buf, 1)) 423 goto err; 424 425 /* LEDs on */ 426 reg = in_be32((void *)(CONFIG_SYS_FPGA_BASE + 0x0c)); 427 if (!(reg & BACKLIGHT_ENABLE)); 428 out_be32((void *)(CONFIG_SYS_FPGA_BASE + 0x0c), 429 reg | BACKLIGHT_ENABLE); 430 } else { 431 buf = 0; 432 if (i2c_write(CONFIG_SYS_I2C_W83782G_ADDR, 0x5b, 1, &buf, 1)) 433 goto err; 434 435 /* LEDs off */ 436 reg = in_be32((void *)(CONFIG_SYS_FPGA_BASE + 0x0c)); 437 reg &= ~BACKLIGHT_ENABLE; 438 out_be32((void *)(CONFIG_SYS_FPGA_BASE + 0x0c), reg); 439 } 440 /* Restore previous bank setting */ 441 if (i2c_write(CONFIG_SYS_I2C_W83782G_ADDR, 0x4e, 1, &old_buf, 1)) 442 goto err; 443 444 return; 445 err: 446 printf("W83782G I2C access failed\n"); 447 } 448 449 void board_backlight_switch (int flag) 450 { 451 char * param; 452 int rc; 453 454 if (w83782d_hwmon_init()) 455 printf ("hwmon IC init failed\n"); 456 457 if (flag) { 458 param = getenv("brightness"); 459 rc = param ? simple_strtol(param, NULL, 10) : -1; 460 if (rc < 0) 461 rc = DEFAULT_BRIGHTNESS; 462 } else { 463 rc = 0; 464 } 465 board_backlight_brightness(rc); 466 } 467 468 #if defined(CONFIG_CONSOLE_EXTRA_INFO) 469 /* 470 * Return text to be printed besides the logo. 471 */ 472 void video_get_info_str (int line_number, char *info) 473 { 474 if (line_number == 1) { 475 strcpy (info, " Board: Socrates"); 476 } else { 477 info [0] = '\0'; 478 } 479 } 480 #endif 481